Toniolo and Linder, Equation (3a)

Time bar (total: 14.0s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze179.0ms (1.3%)

Memory
7.9MiB live, 205.9MiB 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.6s (18.4%)

Memory
51.2MiB live, 2 867.1MiB allocated
Samples
2.1s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.8s
ival-sin: 487.0ms (27.5% of total)
ival-pow2: 359.0ms (20.3% of total)
ival-div: 250.0ms (14.1% of total)
ival-add: 249.0ms (14.1% of total)
ival-mult: 244.0ms (13.8% of total)
ival-sqrt: 162.0ms (9.2% of total)
exact: 8.0ms (0.5% of total)
ival-true: 6.0ms (0.3% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain457.0ms (3.3%)

Memory
9.9MiB live, 677.4MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
490-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(-9.10905536823036e+87 0.783622793323787 1.53545594347298e-293 1.4217285512005292e-158)(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
10-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-rescue490
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))overflow30
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)overflow36
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))overflow79
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))overflow79
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))overflow86
*.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*o40
Confusion
Predicted +Predicted -
+33
-50200
Precision
0.05660377358490566
Recall
0.5
Confusion?
Predicted +Predicted MaybePredicted -
+303
-500200
Precision?
0.05660377358490566
Recall?
0.5
Freqs
test
numberfreq
0203
153
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
111.0ms512×0valid
Compiler

Compiled 445 to 70 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 84.0ms
ival-sin: 24.0ms (28.7% of total)
ival-pow2: 18.0ms (21.5% of total)
ival-sqrt: 15.0ms (17.9% of total)
ival-div: 10.0ms (11.9% of total)
ival-mult: 9.0ms (10.7% of total)
ival-add: 7.0ms (8.4% of total)
exact: 1.0ms (1.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

preprocess176.0ms (1.3%)

Memory
2.5MiB live, 224.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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
Symmetry

(abs ky)

(abs kx)

(abs Om)

(abs l)

(sort kx ky)

Compiler

Compiled 33 to 22 computations (33.3% saved)

eval0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated
Compiler

Compiled 4 to 4 computations (0% saved)

prune1.0ms (0%)

Memory
2.0MiB live, 2.0MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
97.6%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
Compiler

Compiled 33 to 22 computations (33.3% saved)

simplify125.0ms (0.9%)

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

localize70.0ms (0.5%)

Memory
17.6MiB live, 138.0MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.2989376473925669
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
accuracy0.33041000976844204
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
accuracy2.7466957036128345
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
accuracy11.479361721048884
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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
55.0ms256×0valid
Compiler

Compiled 206 to 24 computations (88.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 42.0ms
ival-pow2: 14.0ms (33.1% of total)
ival-sin: 11.0ms (26% of total)
ival-div: 6.0ms (14.2% of total)
ival-mult: 4.0ms (9.5% of total)
ival-add: 3.0ms (7.1% of total)
ival-sqrt: 3.0ms (7.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series175.0ms (1.3%)

Memory
-3.6MiB live, 129.1MiB allocated
Counts
8 → 276
Calls
Call 1
Inputs
#s(alt (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (patch (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (patch (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) (patch (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))) #<representation binary64>) () ())
#s(alt (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (patch (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) (patch (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) (patch (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (patch (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())
Outputs
#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 (* 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 (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 (* 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* 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 (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 (* 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* 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 (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 (* 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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 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 (* 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 (* 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 (* 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 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 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 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(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 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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 (* 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 1 (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 -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 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(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 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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 (* 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 1 (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/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 (* 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 (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 (* 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 (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* 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 (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 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 (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 (* 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 (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 -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 (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 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 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 (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 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 (* 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 1 (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 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 (* 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 (* 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 (* 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 (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 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 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 (* 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 (* -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 (* 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 (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
106.0ms
ky
@0
((pow (/ (* 2 l) Om) 2) (/ 1 2) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 2) (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
7.0ms
l
@inf
((pow (/ (* 2 l) Om) 2) (/ 1 2) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 2) (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
6.0ms
kx
@0
((pow (/ (* 2 l) Om) 2) (/ 1 2) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 2) (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
6.0ms
kx
@inf
((pow (/ (* 2 l) Om) 2) (/ 1 2) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 2) (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
6.0ms
l
@0
((pow (/ (* 2 l) Om) 2) (/ 1 2) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))) (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow (sin ky) 2) (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))

simplify223.0ms (1.6%)

Memory
-13.9MiB live, 260.8MiB allocated
Algorithm
egg-herbie
Rules
11 696×lower-fma.f64
11 696×lower-fma.f32
8 910×lower-*.f64
8 910×lower-*.f32
3 486×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058210419
1193210186
2793410184
080449659
Stop Event
iter limit
node limit
Counts
276 → 276
Calls
Call 1
Inputs
(* 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 (* 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)))))))))
(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)))))))))))))
(* 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))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(* 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 (* 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))))
(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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(* 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 (* 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))))
(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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(* 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/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))))))))))
(* 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))
(* 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)
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
(* 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 (+ (* -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 (* 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 (+ (* -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))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(* 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 (+ (* -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 (* 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 (+ (* -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))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(* 1/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 (* 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)))))))))
(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)))))))))))))
(* 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))))))))
(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))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(* 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 (* 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))))
(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)))
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(* 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 (* 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))))
(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)))
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(* 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
(+ 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))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(* 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/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)))))))))
(* 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))))
(* 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)))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)
(* 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/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)))
(* 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))))
(* -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))))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l))
Outputs
(* 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) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (*.f64 (*.f64 kx kx) (neg.f64 (*.f64 l (/.f64 l (*.f64 Om Om))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (fma.f64 (*.f64 (*.f64 kx kx) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 l (/.f64 l (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (*.f64 (*.f64 kx kx) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64))))) (*.f64 kx kx)))) (*.f64 (neg.f64 (*.f64 l (/.f64 l (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 kx kx) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 kx kx)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 kx kx)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 kx kx)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (*.f64 Om Om)))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (*.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 8/45 binary64)) (*.f64 Om Om))) (*.f64 kx kx)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 kx kx) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) l) l) (*.f64 Om Om))))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 (fma.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 kx kx)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 kx kx)))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 kx kx)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 kx kx)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))
(fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 l (/.f64 l (*.f64 Om Om))) (*.f64 (*.f64 (*.f64 kx kx) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64))))) (*.f64 kx kx)))))) (*.f64 kx kx) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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))))))))
(fma.f64 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
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 Om (/.f64 #s(literal 1/4 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/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 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) Om #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 (fma.f64 (fma.f64 (/.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 l 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 3/512 binary64) (*.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 Om Om) (*.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) Om #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(/ (+ (* 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))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) Om)
(/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 #s(literal 1/4 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 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 (*.f64 #s(literal 2 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) l (*.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 Om Om))) Om)
(/ (+ (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) l (*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 l 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/512 binary64) (*.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 Om Om) (*.f64 (/.f64 #s(literal 1/4 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) (*.f64 Om Om))) Om)
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(*.f64 (*.f64 Om (/.f64 #s(literal 1/2 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 1/2 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 #s(literal 3/256 binary64) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (*.f64 (/.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 l 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 Om Om) (*.f64 (/.f64 #s(literal 1/2 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
(*.f64 (fma.f64 (fma.f64 (/.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 l 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 (fma.f64 (/.f64 (*.f64 #s(literal -5/2048 binary64) (*.f64 Om Om)) (pow.f64 l #s(literal 7 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 7 binary64)))) (*.f64 (/.f64 #s(literal 3/256 binary64) (pow.f64 l #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))))) (*.f64 Om Om))) (*.f64 Om Om) (*.f64 (/.f64 #s(literal 1/2 binary64) l) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))) Om)
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.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 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -1/4 binary64) (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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (fma.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (+.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)) (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 (+.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)))) (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
#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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 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 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 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 (*.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64)) (*.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 3 binary64)) (/.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
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 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (+.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)) (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 (+.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)))) (fma.f64 (*.f64 (*.f64 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.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 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -1/4 binary64) (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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (fma.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (+.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)) (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 (+.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)))) (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
#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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 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 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 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 (*.f64 #s(literal -2 binary64) (pow.f64 l #s(literal 4 binary64))) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64)) (*.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 3 binary64)) (/.f64 (pow.f64 l #s(literal 6 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
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 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) (/.f64 #s(literal -12 binary64) (pow.f64 Om #s(literal 4 binary64))) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (+.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)) (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 (+.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)))) (fma.f64 (*.f64 (*.f64 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (*.f64 (*.f64 ky ky) (neg.f64 (*.f64 l (/.f64 l (*.f64 Om Om))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 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 (fma.f64 (*.f64 (*.f64 ky ky) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (neg.f64 (*.f64 l (/.f64 l (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (*.f64 (*.f64 ky ky) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64) (fma.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64))))) (*.f64 ky ky)))) (*.f64 (neg.f64 (*.f64 l (/.f64 l (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 ky ky) (*.f64 l (/.f64 l (*.f64 Om Om))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 ky ky)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 ky ky)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (*.f64 ky ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ky ky)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (*.f64 Om Om)))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (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 (fma.f64 (*.f64 (*.f64 ky ky) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (*.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal 8/45 binary64)) (*.f64 Om Om))) (*.f64 ky ky)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) l) l) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 ky ky) (*.f64 l (/.f64 l (*.f64 Om Om))) (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))))))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 (fma.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 ky ky)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 ky ky)))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 ky ky)) (*.f64 l (/.f64 l (*.f64 Om Om))) (/.f64 (*.f64 (*.f64 l l) #s(literal -4/3 binary64)) (*.f64 Om Om))) (*.f64 ky ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 ky ky)))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky)
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(*.f64 (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 ky ky) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky)
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(*.f64 (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 ky ky) #s(literal 2/45 binary64)) (*.f64 ky ky) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky)
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))
(fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64) (fma.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 l l) (*.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64))))) (*.f64 ky ky)))) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))))
(fma.f64 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(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))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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))))))))
(fma.f64 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (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 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l)) (/.f64 #s(literal 4 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 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(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))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (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 (fma.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 3 binary64)) (*.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 (*.f64 l l) #s(literal -1/4 binary64)) (fma.f64 (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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 (+.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)))) (*.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.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 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 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 (fma.f64 (*.f64 (*.f64 l l) #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)) (pow.f64 Om #s(literal 4 binary64))) (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.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 (fma.f64 (fma.f64 (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.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)) (pow.f64 Om #s(literal 6 binary64))))) (*.f64 l l) (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.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 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
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 l l) #s(literal -2 binary64)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (fma.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 6 binary64)) (*.f64 l l) (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.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) (+ (* -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 (fma.f64 (*.f64 (*.f64 l l) #s(literal -1/2 binary64)) (fma.f64 (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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 (+.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)))) (*.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 (/.f64 (+.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))) (*.f64 l l) #s(literal 1 binary64))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
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 Om (/.f64 #s(literal 1/4 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -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 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (*.f64 l 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)))) (fma.f64 (*.f64 Om (/.f64 #s(literal 1/4 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -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 (*.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) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)))) (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (fma.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (*.f64 l 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)))) (fma.f64 (*.f64 Om (/.f64 #s(literal 1/4 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/2 binary64))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* (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 l l)) (/.f64 #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(*.f64 (fma.f64 (/.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 Om Om) Om)) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) l)
(* 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 (/.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 Om Om) Om)) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (/.f64 (*.f64 #s(literal 1/512 binary64) (pow.f64 Om #s(literal 5 binary64))) (pow.f64 l #s(literal 6 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)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) l)
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(*.f64 (*.f64 Om (/.f64 #s(literal 1/2 binary64) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)
(/.f64 (fma.f64 (*.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)))))) Om (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om 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)))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)
(/.f64 (fma.f64 (*.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)))))) Om (fma.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om 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 (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)
(/.f64 (fma.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (-.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 Om Om)) (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 Om #s(literal 8 binary64)) #s(literal 1/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 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om))) (fma.f64 (*.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)))))) Om (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om 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))))))) l)
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
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/4 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)))))) Om (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om 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)))))) 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 (*.f64 #s(literal 1/4 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)))))) Om (fma.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om 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) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)))))) l))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* (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 l l)) (/.f64 #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(* -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 (neg.f64 l) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 Om Om) Om)) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))
(* -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 (neg.f64 l) (fma.f64 (/.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 Om Om) Om)) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (/.f64 (*.f64 #s(literal 1/512 binary64) (pow.f64 Om #s(literal 5 binary64))) (pow.f64 l #s(literal 6 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)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 2 binary64) Om) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (*.f64 (*.f64 l l) #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)))
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(*.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))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))
(/.f64 (fma.f64 (*.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)))))) Om (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om 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)))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))
(/.f64 (fma.f64 (*.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)))))) Om (fma.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om 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 (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l))
(/.f64 (fma.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (-.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)))) (/.f64 (fma.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 Om Om)) (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal -3/256 binary64) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (/.f64 (*.f64 (pow.f64 Om #s(literal 8 binary64)) #s(literal 1/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 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om))) (fma.f64 (*.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)))))) Om (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om 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))))))) (neg.f64 l))

rewrite197.0ms (1.4%)

Memory
27.9MiB live, 257.3MiB 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
021116
037116
1129113
2924113
08513109
Stop Event
iter limit
node limit
iter limit
Counts
8 → 639
Calls
Call 1
Inputs
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
(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)))))))
Outputs
(*.f64 (*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 l Om))
(*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)))
(*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) l) (/.f64 #s(literal 2 binary64) Om))
(*.f64 (*.f64 l l) (*.f64 (/.f64 #s(literal 2 binary64) Om) (/.f64 #s(literal 2 binary64) Om)))
(*.f64 (/.f64 (*.f64 #s(literal -2 binary64) l) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om))
(*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal -1 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 l Om)))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) Om) (/.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (/.f64 (/.f64 l Om) Om) (/.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (pow.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 l Om))
(*.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) #s(literal 1 binary64)))
(*.f64 (pow.f64 l #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 2 binary64) Om) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) Om) (/.f64 (/.f64 l Om) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (neg.f64 l)) (/.f64 #s(literal -1 binary64) Om))
(*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (*.f64 l #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (/.f64 l Om))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (/.f64 (/.f64 #s(literal -1 binary64) Om) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (*.f64 #s(literal -2 binary64) (/.f64 l Om)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)))
(*.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 Om) Om)))
(*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 #s(literal -1 binary64) Om) (/.f64 #s(literal -1 binary64) Om)))
(*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) Om) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (/.f64 (*.f64 l #s(literal 2 binary64)) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (*.f64 (*.f64 l l) #s(literal 4 binary64)))
(*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) #s(literal 1 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (/.f64 l Om)))
(*.f64 (/.f64 l Om) (/.f64 (/.f64 #s(literal 2 binary64) 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 #s(literal 1 binary64) Om) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
(*.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)))
(*.f64 (*.f64 #s(literal -2 binary64) l) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (*.f64 #s(literal -2 binary64) l))))
(*.f64 (*.f64 #s(literal -2 binary64) l) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (neg.f64 Om))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om 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 #s(literal 2 binary64)) Om) (/.f64 (*.f64 l #s(literal 2 binary64)) Om))
(*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (*.f64 l #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om)))
(*.f64 (*.f64 l #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) Om)))
(*.f64 (*.f64 l #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 Om (/.f64 Om (*.f64 l #s(literal 2 binary64))))))
(*.f64 (*.f64 l #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) #s(literal 1 binary64)))
(*.f64 (*.f64 l #s(literal 2 binary64)) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)))
(*.f64 l (*.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om)))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)))
(pow.f64 (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) #s(literal -2 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) #s(literal -1 binary64)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) #s(literal 1 binary64)) Om)
(/.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal -1 binary64)) (/.f64 Om (*.f64 #s(literal -2 binary64) l)))
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) Om)
(/.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (/.f64 Om l))
(/.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (/.f64 Om (*.f64 #s(literal -2 binary64) l)))
(/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64))) (*.f64 (neg.f64 Om) Om))
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(/.f64 (*.f64 #s(literal -2 binary64) l) (/.f64 (*.f64 Om Om) (*.f64 #s(literal -2 binary64) l)))
(/.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (neg.f64 Om)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 Om) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (neg.f64 l))))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 Om Om) (*.f64 #s(literal -2 binary64) l)) (*.f64 #s(literal -2 binary64) l)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 Om) Om) (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om (/.f64 Om (*.f64 l #s(literal 2 binary64)))) (*.f64 l #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (/.f64 Om (*.f64 l #s(literal 2 binary64))))
(/.f64 (*.f64 l #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 Om Om) (*.f64 #s(literal -2 binary64) l))))
(/.f64 (*.f64 l #s(literal 2 binary64)) (neg.f64 (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (neg.f64 Om))))
(/.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) Om))
(/.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 Om (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64))) (*.f64 Om Om)))
(exp.f64 (+.f64 (log.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (log.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(*.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(*.f64 (fma.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (/.f64 #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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(*.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (+.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)))) (neg.f64 (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (+.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) (+.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) (neg.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64))))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.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 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal 1 binary64)) (fma.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/4 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64))) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))
(fma.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64))) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(*.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))))
(*.f64 (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(pow.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (*.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))) (*.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))) (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (-.f64 (*.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 (*.f64 l l) #s(literal 4 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64))) (-.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 3 binary64))) (fma.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (fma.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 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 (*.f64 l l) #s(literal 4 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (-.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))))) (neg.f64 (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(neg.f64 (/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))))
(neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (neg.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(neg.f64 (neg.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 l Om)) #s(literal 2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal 1 binary64) Om)) (*.f64 l #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (/.f64 #s(literal -1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) l) (/.f64 #s(literal 2 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (/.f64 l Om) #s(literal 4 binary64))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #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 l #s(literal 2 binary64)) Om)) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 l Om)) #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal 1 binary64) Om)) (*.f64 l #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (/.f64 #s(literal -1 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) l) (/.f64 #s(literal 2 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) (/.f64 l Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))) (sqrt.f64 (sin.f64 ky)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (sin.f64 ky)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (/.f64 l Om) #s(literal 4 binary64))) (/.f64 l Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (/.f64 l Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 l #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 l #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) #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 l #s(literal 2 binary64)) Om))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky))) (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om))) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky)) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))) (sqrt.f64 (sin.f64 kx)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 l Om)) #s(literal 2 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal 1 binary64) Om)) (*.f64 l #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (/.f64 #s(literal -1 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) l) (/.f64 #s(literal 2 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 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 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) (/.f64 l Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sin.f64 kx) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (sin.f64 kx)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (/.f64 l Om) #s(literal 4 binary64))) (/.f64 l Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (/.f64 l Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx))) (sin.f64 kx) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 l #s(literal 2 binary64)) Om))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om))) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 kx)) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal 1 binary64))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) 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)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (*.f64 (sin.f64 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (*.f64 (/.f64 #s(literal 1 binary64) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 #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 l 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 #s(literal 1/2 binary64) (-.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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky)) (*.f64 (sin.f64 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky)) (sin.f64 ky) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sqrt.f64 (sin.f64 ky)) (*.f64 (sqrt.f64 (sin.f64 ky)) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sqrt.f64 (sin.f64 kx)) (*.f64 (sqrt.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) #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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) (/.f64 l 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) (/.f64 l 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 ky) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 ky) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(fma.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (sin.f64 ky) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))) #s(literal 1 binary64))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(sqrt.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(-.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(exp.f64 (fma.f64 (log1p.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal 1/2 binary64) (*.f64 (log1p.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal 1/2 binary64))))
(+.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(pow.f64 (exp.f64 (log1p.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (neg.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(neg.f64 (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 l Om)) #s(literal 2 binary64))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal 1 binary64) Om)) (*.f64 l #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (/.f64 #s(literal -1 binary64) Om))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) l) (/.f64 #s(literal 2 binary64) Om))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) (/.f64 l Om))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (/.f64 l Om) #s(literal 4 binary64))) (/.f64 l Om))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (/.f64 l Om)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 l #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)))
(*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 (sin.f64 kx) (sin.f64 ky))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (*.f64 (/.f64 #s(literal 1 binary64) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))))
(*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(*.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal -1 binary64)) (/.f64 Om (*.f64 #s(literal -2 binary64) l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (neg.f64 l))) (neg.f64 Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)))) (*.f64 (neg.f64 Om) Om))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64)))) (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 Om (*.f64 l #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) Om)
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) Om)
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (*.f64 Om Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 #s(literal -2 binary64) l)) (/.f64 (*.f64 Om Om) (*.f64 #s(literal -2 binary64) l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 #s(literal -2 binary64) l)) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #s(literal 1 binary64)) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 l #s(literal 2 binary64))) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 l #s(literal 2 binary64))) (*.f64 Om (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)) (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64)) (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (neg.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)))) (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 Om (*.f64 l #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(/.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 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 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (pow.f64 (sin.f64 ky) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.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 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))) (+.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 6 binary64)))))
(/.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))))
(neg.f64 (*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64))) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (-.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 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 l #s(literal 2 binary64)) Om)) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 l Om)) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal 1 binary64) Om)) (*.f64 l #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (/.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) (/.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) l) (/.f64 #s(literal 2 binary64) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) (/.f64 l Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky)) (sqrt.f64 (sin.f64 ky))) (sqrt.f64 (sin.f64 ky)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (sin.f64 ky)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sin.f64 ky) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.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)) l)) (/.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 l Om) (/.f64 l Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.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 (*.f64 l #s(literal 2 binary64)) Om) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 l #s(literal 2 binary64)) Om))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky))) (sin.f64 ky) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om))) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 ky)) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sqrt.f64 (sin.f64 kx))) (sqrt.f64 (sin.f64 kx)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om))) (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 l Om)) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 #s(literal 1 binary64) Om)) (*.f64 l #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 #s(literal -2 binary64) l)) (/.f64 #s(literal -1 binary64) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 1 binary64)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 l #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) l) (/.f64 #s(literal 2 binary64) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) #s(literal 2 binary64)) (/.f64 l Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (sin.f64 kx)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) Om) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 l Om) (/.f64 l Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 l #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx))) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 l #s(literal 2 binary64)) Om))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om))) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 kx)) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (*.f64 (sin.f64 kx) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky)) (*.f64 (sin.f64 ky) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 ky)) (sin.f64 ky) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sqrt.f64 (sin.f64 ky)) (*.f64 (sqrt.f64 (sin.f64 ky)) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sqrt.f64 (sin.f64 kx)) (*.f64 (sqrt.f64 (sin.f64 kx)) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (sqrt.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (*.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 #s(literal -1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 ky) (*.f64 (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 ky) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 kx) (*.f64 (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 kx) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (sin.f64 kx) l) (/.f64 #s(literal 2 binary64) Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (sin.f64 ky) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 ky)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 l (*.f64 (/.f64 #s(literal 2 binary64) Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(literal 2 binary64) Om)) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) (-.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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 l Om) (*.f64 #s(literal 2 binary64) (sin.f64 kx))) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (sin.f64 ky) l) (/.f64 #s(literal 2 binary64) Om)) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l 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 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (*.f64 (sin.f64 ky) (sqrt.f64 (sin.f64 ky))) (sqrt.f64 (sin.f64 ky)))
(*.f64 (sqrt.f64 (sin.f64 ky)) (*.f64 (sqrt.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 (sin.f64 ky) (sin.f64 ky))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 ky)))
(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 (sin.f64 ky) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(/.f64 (-.f64 #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 (neg.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 (+.f64 ky ky)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 #s(literal 0 binary64)) (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)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 ky ky)) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.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 ky ky))))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64))) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) #s(literal 1 binary64))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(pow.f64 (pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log1p.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))

eval248.0ms (1.8%)

Memory
-8.3MiB live, 265.3MiB allocated
Compiler

Compiled 46 391 to 5 334 computations (88.5% saved)

prune234.0ms (1.7%)

Memory
-10.9MiB live, 222.1MiB allocated
Pruning

10 alts after pruning (10 fresh and 0 done)

PrunedKeptTotal
New90510915
Fresh000
Picked101
Done000
Total90610916
Accuracy
100.0%
Counts
916 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
32.9%
(sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
73.5%
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
89.5%
(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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))))
88.3%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
31.1%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky))))))))))
74.9%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))))
51.6%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
81.9%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
60.1%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1 binary64)))
57.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(literal 1/2 binary64)))
Compiler

Compiled 672 to 410 computations (39% saved)

simplify220.0ms (1.6%)

Memory
7.3MiB live, 159.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 18 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))))
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))
cost-diff320
(-.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 kx kx)))))
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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))))
cost-diff704
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
cost-diff0
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))))
cost-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
Rules
10 776×lower-fma.f32
10 768×lower-fma.f64
5 936×lower-*.f32
5 908×lower-*.f64
3 988×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0801111
01441099
12491067
25571061
32283993
47510993
08265961
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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 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 (*.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 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
#s(literal 1/2 binary64)
(-.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 kx kx)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 ky 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)))
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
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(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 l l))
#s(literal 4 binary64)
(*.f64 l l)
l
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(sin.f64 ky)
ky
#s(literal 2 binary64)
(*.f64 Om Om)
Om
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
#s(literal 1/2 binary64)
(-.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 kx kx)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 ky 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)))
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
kx
(*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))))
(/.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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
(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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 ky ky)
ky
Outputs
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) (/.f64 l Om))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
(neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(-.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 kx kx)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
ky
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
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(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l (/.f64 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 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) #s(literal 4 binary64)) (*.f64 l (/.f64 l (*.f64 Om Om))) #s(literal 1 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 l l))
(*.f64 (*.f64 l l) #s(literal 4 binary64))
#s(literal 4 binary64)
(*.f64 l l)
l
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
(sin.f64 ky)
ky
#s(literal 2 binary64)
(*.f64 Om Om)
Om
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
(*.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64))) (/.f64 l Om)))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
(neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1 binary64)))
#s(literal 1/2 binary64)
(-.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 kx kx)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
ky
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
kx
(*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #s(literal 1 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) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #s(literal 1 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) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #s(literal 1 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #s(literal 1 binary64))))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
(sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
(fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) #s(literal 1 binary64))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
(*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
(*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l))
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
(*.f64 (/.f64 l Om) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) l)
(*.f64 l #s(literal 2 binary64))
l
Om
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))
(+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64)))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(sin.f64 kx)
kx
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 ky ky)
ky

localize588.0ms (4.2%)

Memory
0.1MiB live, 485.6MiB allocated
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy0.2989376473925669
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
accuracy2.7466957036128345
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
accuracy11.479361721048884
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
accuracy44.759060739305845
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
accuracy3.157831638058665
(*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
accuracy12.57118197205254
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
accuracy18.728506974465233
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
accuracy0.6877229180923876
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
accuracy3.1775021598097797
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
accuracy11.627191947954296
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
accuracy13.656946395056229
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
accuracy0.01171875
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64)))
accuracy27.516937756593457
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(literal 1/2 binary64))
accuracy3.842870582293312
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
accuracy12.57118197205254
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
accuracy18.728506974465233
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
Samples
219.0ms92×2valid
131.0ms92×1valid
101.0ms72×0valid
Compiler

Compiled 1 072 to 66 computations (93.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 266.0ms
ival-cos: 53.0ms (19.9% of total)
ival-mult: 48.0ms (18% of total)
ival-add: 42.0ms (15.8% of total)
adjust: 37.0ms (13.9% of total)
ival-div: 24.0ms (9% of total)
ival-sqrt: 21.0ms (7.9% of total)
ival-pow2: 19.0ms (7.1% of total)
ival-sin: 15.0ms (5.6% of total)
ival-sub: 7.0ms (2.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series345.0ms (2.5%)

Memory
-5.9MiB live, 234.2MiB allocated
Counts
27 → 1 044
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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#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 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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 (*.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)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())
#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())
Outputs
#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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (* 2 ky))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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 (* 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om))) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om))))) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow kx 2) (pow l 2)) Om))))))) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))))) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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 (* 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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 (* 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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(literal 1/2 binary64))) (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 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 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (/ Om (* l (sin ky))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ 1 (* l (sin ky))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 ky) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/4 (/ 1 (* l (sin ky))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ Om (* l (sin ky)))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (/ (pow Om 2) (* (pow l 3) (pow (sin ky) 3)))) (* 1/2 (/ 1 (* l (sin ky)))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* (pow Om 2) (- (* 3/256 (/ (pow Om 2) (* (pow l 5) (pow (sin ky) 5)))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/2 (/ 1 (* l (sin ky)))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* (pow Om 2) (- (* (pow Om 2) (+ (* -5/2048 (/ (pow Om 2) (* (pow l 7) (pow (sin ky) 7)))) (* 3/256 (/ 1 (* (pow l 5) (pow (sin ky) 5)))))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/2 (/ 1 (* l (sin ky)))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 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 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor 0 Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5))))))))))) (taylor 0 Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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(literal 1/2 binary64))) (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 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 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 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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(literal 1/2 binary64))) (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 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 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 -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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf Om) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (* 2 kx))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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 (* 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow ky 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/2 (* (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/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (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 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (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 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow ky 2) (pow Om 2)) (taylor 0 ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* -1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (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 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/315 (/ (pow ky 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2)))) (taylor 0 ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om))) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om))))) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow ky 2) (pow l 2)) Om))))))) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (pow ky 2) (taylor 0 ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2)))) (taylor 0 ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3)))) (taylor 0 ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3)))) (taylor 0 ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))))) (taylor 0 ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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/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 (+ 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.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))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<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/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 (+ 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))) (taylor -inf ky) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (taylor -inf ky) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #<representation binary64>) () ())) ())
#s(alt (/ (pow (sin ky) 2) (pow Om 2)) (taylor -inf ky) (#s(alt (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (patch (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.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))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (pow (sin ky) 2) (taylor -inf ky) (#s(alt #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (patch #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #<representation binary64>) () ())) ())
#s(alt (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))) (taylor -inf ky) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 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 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin ky) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin ky) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin ky) 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin ky) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin ky) 2) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin ky) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (pow (sin ky) 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin ky) 6) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 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 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 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.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 l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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(literal 1/2 binary64))) (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 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 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (/ Om (* l (sin ky))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky)))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ Om (* l (sin ky)))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin ky) (+ (* 1/256 (/ (pow Om 8) (pow (sin ky) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (pow (sin ky) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 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 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l) (taylor inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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(literal 1/2 binary64))) (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 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 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (/ Om (* l (sin ky))))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/4 (/ Om (sin ky)))) l))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/4 (/ Om (sin ky))))) l))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (/ Om (* l (sin ky)))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin ky) (+ (* 1/256 (/ (pow Om 8) (pow (sin ky) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (pow (sin ky) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 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 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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)) (taylor -inf l) (#s(alt (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) (patch (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))) #<representation binary64>) () ())) ())
Calls

12 calls:

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

simplify368.0ms (2.6%)

Memory
49.6MiB live, 512.0MiB allocated
Algorithm
egg-herbie
Rules
9 698×lower-fma.f64
9 698×lower-fma.f32
7 296×lower-*.f64
7 296×lower-*.f32
6 414×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158344333
1534443276
0882641441
Stop Event
iter limit
node limit
Counts
1 044 → 1 044
Calls
Call 1
Inputs
(+ 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/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 (cos (* 2 ky)))
(+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))
(* (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))))))))))))))))
(* 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))))))))))))
(* (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))))))))))))))))
(* 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 (* 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/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) (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 (* 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)))))))))
(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 ky))))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(/ (* 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))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow kx 2) (pow l 2)) Om)))))))
(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)))))))))))))
(* 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))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(+ 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/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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/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/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 (+ 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/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 (* 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/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) (+ (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 (* 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/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 (+ (* 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(+ 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/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 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/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/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 (+ 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/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 (* 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/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) (+ (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 (* 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/2 (* 1/2 (cos (neg (* -2 kx)))))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(- 1 (+ (* 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(* 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/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))))))))))
(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))))))))))))))
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))))))))))
(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))))))))))))))
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/2
(+ 1/2 (* 1/4 (/ Om (* l (sin ky)))))
(+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ 1 (* l (sin ky)))))))
(+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin ky) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/4 (/ 1 (* l (sin ky)))))))
(* 1/2 (/ Om (* l (sin ky))))
(* Om (+ (* -1/16 (/ (pow Om 2) (* (pow l 3) (pow (sin ky) 3)))) (* 1/2 (/ 1 (* l (sin ky))))))
(* Om (+ (* (pow Om 2) (- (* 3/256 (/ (pow Om 2) (* (pow l 5) (pow (sin ky) 5)))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/2 (/ 1 (* l (sin ky))))))
(* Om (+ (* (pow Om 2) (- (* (pow Om 2) (+ (* -5/2048 (/ (pow Om 2) (* (pow l 7) (pow (sin ky) 7)))) (* 3/256 (/ 1 (* (pow l 5) (pow (sin ky) 5)))))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/2 (/ 1 (* l (sin ky))))))
(* 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/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))))))))))
(* 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/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))))))))))
(* 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))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/ (* 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)
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 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)
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
1
(+ 1 (* 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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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)))))
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))))))
(* (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)))))
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 ky) 2)) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (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))))
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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 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 (+ (* -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 (* 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) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) 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))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
1
(+ 1 (* 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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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)))))
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))))))
(* (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)))))
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 ky) 2)) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (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))))
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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 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 (+ (* -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 (* 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) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) 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))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(+ 1 (* 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/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 (cos (* 2 kx)))
(+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))
(* (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))))))))))))))))
(* 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))))))))))))
(* (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))))))))))))))))
(* 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
(+ 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
(+ 1 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow ky 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (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) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/2 (* (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/2 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* 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/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) (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 (* 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/2 (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(/ (* 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))
1
(+ 1 (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ 1 (* (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))))))))
(/ (pow ky 2) (pow Om 2))
(* (pow ky 2) (+ (* -1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (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))))
(* (pow ky 2) (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/315 (/ (pow ky 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow ky 2) (pow l 2)) Om)))))))
(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))))
(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)))))))))))))
(* 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))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(+ 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/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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/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/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 (+ 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/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/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 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/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) (+ (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 (* 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 (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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(+ 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 (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 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/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/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 (+ 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/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/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (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 (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 (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 (* 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 (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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (- 1 (+ (* 1/2 (cos (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 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(/ (pow (sin ky) 2) (pow Om 2))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 2)
(pow (sin ky) 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)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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))))))))))
(* (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))))))))
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))))))))))
(* (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))))))))
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
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin ky) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin ky) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin ky) 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin ky) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))))))))
1
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin ky) 2) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin ky) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (pow (sin ky) 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin ky) 6) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))))))))
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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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))))))))))
(* 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
(+ 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) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(/ (* 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)
1
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
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))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
1
(+ 1 (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 64 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))))))))))
(* 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))))
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))))))))))))
(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))))))
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)))))))))
(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))))))
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 (sin ky)))))
(+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky))))))
(+ 1/2 (+ (* -1/2 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky)))))))
(* 1/2 (/ Om (* l (sin ky))))
(/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))) l)
(/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky))))) l)
(/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin ky) (+ (* 1/256 (/ (pow Om 8) (pow (sin ky) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (pow (sin ky) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))))) l)
(* 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))))
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))))))))))))
(* 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/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)))))))))
(* 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))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(/ (* 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)
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 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)))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)
(* 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))))
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)))
(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)))
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)))
(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)))
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 (sin ky)))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/4 (/ Om (sin ky)))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/4 (/ Om (sin ky))))) l)))
(* -1/2 (/ Om (* l (sin ky))))
(* -1 (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))) l))
(* -1 (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky))))) l))
(* -1 (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin ky) (+ (* 1/256 (/ (pow Om 8) (pow (sin ky) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (pow (sin ky) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))))) l))
(* 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))))
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)))
(* 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/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)))
(* 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))))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(/ (* 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)
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* -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))))))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l))
Outputs
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (cos (* 2 ky)))
(*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 kx) kx))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal -1 binary64)) (*.f64 kx kx)))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 kx kx) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal -1 binary64)) (*.f64 kx kx)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.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 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 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) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal -1/4 binary64))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.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 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 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) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal -1/4 binary64))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal -1/4 binary64))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #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)))))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 kx kx) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 kx kx)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal 2/45 binary64))) (*.f64 kx kx) (/.f64 l Om)) (*.f64 kx kx)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om))
(*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) Om))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 kx kx)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow kx 2) (pow l 2)) Om)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) Om)) #s(literal 8/45 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal -4/3 binary64))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 kx kx)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 l l)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))))
(+ (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #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 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))
(fma.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow kx 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 (*.f64 kx kx) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))) #s(literal -1/2 binary64))) (*.f64 kx kx) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))) (* (pow kx 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))) (* (pow kx 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal -16 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 l #s(literal 4 binary64))) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 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))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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 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)) (-.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 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)) (-.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 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)) (-.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 Om Om)) (*.f64 Om Om))
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) (-.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/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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))))) Om #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 (fma.f64 (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 #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 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/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 (sqrt.f64 #s(literal 1/2 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))))) (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 (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 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.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 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (*.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))))))) Om (sqrt.f64 #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 (*.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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) Om #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 (fma.f64 (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 (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 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) Om #s(literal 1/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 (sqrt.f64 #s(literal 1/2 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))))) (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 (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 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.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 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (*.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))))))) Om (sqrt.f64 #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 (*.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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) Om #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 (fma.f64 (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 (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 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) Om #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (/ Om (* l (sin ky)))))
(fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* -1/32 (/ (pow Om 2) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ 1 (* l (sin ky)))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 Om Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l))) #s(literal -1/32 binary64) (/.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 ky) l))) Om #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* (pow Om 2) (- (* 3/512 (/ (pow Om 2) (* (pow l 5) (pow (sin ky) 5)))) (* 1/32 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/4 (/ 1 (* l (sin ky)))))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 Om Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 5 binary64)) (pow.f64 l #s(literal 5 binary64)))) #s(literal 3/512 binary64) (/.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (/.f64 #s(literal 1/4 binary64) (*.f64 (sin.f64 ky) l))) Om #s(literal 1/2 binary64))
(* 1/2 (/ Om (* l (sin ky))))
(*.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/2 binary64))
(* Om (+ (* -1/16 (/ (pow Om 2) (* (pow l 3) (pow (sin ky) 3)))) (* 1/2 (/ 1 (* l (sin ky))))))
(*.f64 (fma.f64 (/.f64 (*.f64 Om Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l))) #s(literal -1/16 binary64) (/.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) l))) Om)
(* Om (+ (* (pow Om 2) (- (* 3/256 (/ (pow Om 2) (* (pow l 5) (pow (sin ky) 5)))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/2 (/ 1 (* l (sin ky))))))
(*.f64 (fma.f64 (fma.f64 #s(literal 3/256 binary64) (/.f64 (*.f64 Om Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 5 binary64)) (pow.f64 l #s(literal 5 binary64)))) (/.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (/.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) l))) Om)
(* Om (+ (* (pow Om 2) (- (* (pow Om 2) (+ (* -5/2048 (/ (pow Om 2) (* (pow l 7) (pow (sin ky) 7)))) (* 3/256 (/ 1 (* (pow l 5) (pow (sin ky) 5)))))) (* 1/16 (/ 1 (* (pow l 3) (pow (sin ky) 3)))))) (* 1/2 (/ 1 (* l (sin ky))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 Om Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 7 binary64)) (pow.f64 l #s(literal 7 binary64)))) #s(literal -5/2048 binary64) (/.f64 #s(literal 3/256 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 5 binary64)) (pow.f64 l #s(literal 5 binary64))))) (*.f64 Om Om) (/.f64 #s(literal -1/16 binary64) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (/.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 ky) l))) 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)) (-.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 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)) (-.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 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)) (-.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 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)) (-.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 Om Om)) (*.f64 Om Om))
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) (-.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/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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))))) Om #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 (fma.f64 (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 #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 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) Om #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 (fma.f64 (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 (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 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) Om #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(/ (+ (* 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))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.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))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.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 2 binary64) l) (sqrt.f64 (-.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))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.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))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.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))))))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (pow (sin ky) 2))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.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))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.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 2 binary64) l) (sqrt.f64 (-.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))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.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))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #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)))))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.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))))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* l (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om 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 2 binary64) l) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 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 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.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/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) Om)
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(*.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))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))
(*.f64 (fma.f64 (fma.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 (/.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 l l) l)) #s(literal -1/16 binary64))) (*.f64 Om Om) (*.f64 (/.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))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 5)))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 7 binary64)))) (*.f64 (/.f64 (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)))) (pow.f64 l #s(literal 5 binary64))) #s(literal 3/256 binary64))) (*.f64 Om Om) (*.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 (*.f64 l l) l)) #s(literal -1/16 binary64))) (*.f64 Om Om) (*.f64 (/.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))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 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 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.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 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 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 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 Om Om)) #s(literal 1 binary64)))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
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)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 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)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 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 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (pow (sin ky) 2) (+ (* -16 (* (pow l 4) (pow (sin ky) 4))) (* 4 (* (pow l 4) (pow (sin ky) 4))))))) (* 64 (* (pow l 6) (pow (sin ky) 6)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.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 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 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 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.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 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 Om Om)) #s(literal 1 binary64)))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
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)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 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)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64)))) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 64 (* (pow l 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 (*.f64 (neg.f64 ky) ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (cos (* 2 kx)))
(*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 ky) ky))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal -1 binary64)) (*.f64 ky ky)))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal -1 binary64)) (*.f64 ky ky)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 ky) ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 ky) ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(fma.f64 (*.f64 (neg.f64 ky) ky) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 ky ky)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 ky ky) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 ky ky) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow ky 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ky ky)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64))
(+ 1 (* (pow ky 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -1/2 (* (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/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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 ky ky) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 ky ky) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 (*.f64 (neg.f64 ky) ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 ky) ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(fma.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) #s(literal 1 binary64))
(+ 1 (+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #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)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(-.f64 (fma.f64 ky ky #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(-.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 ky ky) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal 2/45 binary64) (*.f64 (/.f64 l Om) #s(literal -1/3 binary64))) (*.f64 ky ky) (/.f64 l Om)) (*.f64 ky ky)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64))
(+ 1 (* (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 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64))
(/ (pow ky 2) (pow Om 2))
(/.f64 (*.f64 ky ky) (*.f64 Om Om))
(* (pow ky 2) (+ (* -1/3 (/ (pow ky 2) (pow Om 2))) (/ 1 (pow Om 2))))
(*.f64 (fma.f64 (/.f64 (*.f64 ky ky) (*.f64 Om Om)) #s(literal -1/3 binary64) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) (*.f64 ky ky))
(* (pow ky 2) (+ (* (pow ky 2) (- (* 2/45 (/ (pow ky 2) (pow Om 2))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 ky ky) (*.f64 Om Om)) #s(literal 2/45 binary64) (/.f64 #s(literal -1/3 binary64) (*.f64 Om Om))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) (*.f64 ky ky))
(* (pow ky 2) (+ (* (pow ky 2) (- (* (pow ky 2) (+ (* -1/315 (/ (pow ky 2) (pow Om 2))) (* 2/45 (/ 1 (pow Om 2))))) (* 1/3 (/ 1 (pow Om 2))))) (/ 1 (pow Om 2))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 ky ky) (*.f64 Om Om)) #s(literal -1/315 binary64) (/.f64 #s(literal 2/45 binary64) (*.f64 Om Om))) (*.f64 ky ky) (/.f64 #s(literal -1/3 binary64) (*.f64 Om Om))) (*.f64 ky ky) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))) (*.f64 ky ky))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om))
(*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) Om))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 ky ky)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow ky 2) (pow l 2)) Om)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) Om)) #s(literal 8/45 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal -4/3 binary64))) (*.f64 ky ky) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 ky ky)))
(pow ky 2)
(*.f64 ky ky)
(* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))
(*.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky))
(* (pow ky 2) (+ 1 (* (pow ky 2) (- (* (pow ky 2) (+ 2/45 (* -1/315 (pow ky 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/315 binary64) #s(literal 2/45 binary64)) (*.f64 ky ky) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))))
(+ (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky)))
(+ (* 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 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) (*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64)))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* -2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))
(fma.f64 (*.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* -1/2 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))) (* (pow ky 2) (+ (* -2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/2 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (* -1/2 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 ky ky) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(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))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 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))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(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))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(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))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(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))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.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))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.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))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.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))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.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))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(/ (pow (sin ky) 2) (pow Om 2))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(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))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.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 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.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 l l) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (* (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 (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)) (/.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 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)))) (*.f64 l l) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (* (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 (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)) (/.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 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)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin ky) 2) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (pow (sin ky) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (pow (sin ky) 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin ky) 6) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 64 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin ky) 2) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #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 ky) #s(literal 2 binary64))) (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (pow (sin ky) 2) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (pow (sin ky) 2) (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (sin ky) 6) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (sin ky) 4) (pow Om 4))) (* 4 (/ (pow (sin ky) 4) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 64 binary64) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (pow.f64 Om #s(literal 6 binary64)))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.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 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.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 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.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 l l) #s(literal 1 binary64))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
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 (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)) (/.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 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)))) (*.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.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 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.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 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.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 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.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 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.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 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.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 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.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 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) #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 (fma.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)) (*.f64 l l)) (pow.f64 Om #s(literal 4 binary64))) #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 Om Om)) #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 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.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)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 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)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4))) (* 4 (/ (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2) (pow Om 4)))))))))
(fma.f64 (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 (/.f64 (+.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))) (*.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) (+ (* -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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 l l) (*.f64 (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 l l) #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)) (-.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 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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.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/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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.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 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.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/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/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 (sqrt.f64 #s(literal 1/2 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))))) (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))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 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)))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #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 (*.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))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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/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 (*.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 (pow.f64 l #s(literal 5 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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))))
(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 (sqrt.f64 #s(literal 1/2 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))))) (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))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 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)))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #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 (*.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))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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/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 (*.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 (pow.f64 l #s(literal 5 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (/ Om (* l (sin ky)))))
(fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky))))))
(fma.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l))) #s(literal -1/32 binary64) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/4 binary64) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 5)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 3) (pow (sin ky) 3)))) (* 1/4 (/ Om (* l (sin ky)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (sin.f64 ky)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) #s(literal -1/2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 (*.f64 l l) l))) #s(literal -1/32 binary64) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/4 binary64) #s(literal 1/2 binary64))))
(* 1/2 (/ Om (* l (sin ky))))
(*.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/2 binary64))
(/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))) l)
(/.f64 (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l)))) l)
(/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky))))) l)
(/.f64 (fma.f64 (neg.f64 (sin.f64 ky)) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l))))) l)
(/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin ky) (+ (* 1/256 (/ (pow Om 8) (pow (sin ky) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (pow (sin ky) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))))) l)
(/.f64 (fma.f64 (neg.f64 (sin.f64 ky)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (*.f64 Om Om)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)) (fma.f64 (neg.f64 (sin.f64 ky)) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l 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)) (-.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 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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.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/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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.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 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.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/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
(* 4 (/ (pow l 2) (pow Om 2)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))
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))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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/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 (*.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 (pow.f64 l #s(literal 5 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.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 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.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))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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))))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))))) l)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 l l) #s(literal 1 binary64))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.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))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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))))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))))) l)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) Om) #s(literal 2 binary64))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) Om) #s(literal 2 binary64)))) l)
(* 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 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) Om) #s(literal 2 binary64))))) l)
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(*.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))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om 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/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 (fma.f64 (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.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 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om 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/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l)
(/.f64 (fma.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (+.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (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 (pow.f64 l #s(literal 4 binary64)) Om))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om 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)
(* 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)) (-.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 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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.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/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #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)))))))))) 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.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 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.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/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #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))))))))))) 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 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) l)) #s(literal 1/32 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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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)) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 Om Om) (/.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))))) #s(literal -1/32 binary64))) (neg.f64 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 (*.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 (*.f64 Om 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 (*.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 (pow.f64 l #s(literal 4 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om 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))
(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 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) l)) #s(literal 1/32 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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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)) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 Om Om) (/.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))))) #s(literal -1/32 binary64))) (neg.f64 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 (*.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 (*.f64 Om 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 (*.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 (pow.f64 l #s(literal 4 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om 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 (sin ky)))))
(fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/4 (/ Om (sin ky)))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l)))) l))
(+ 1/2 (* -1 (/ (+ (* -1/2 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/32 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/4 (/ Om (sin ky))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (sin.f64 ky)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) #s(literal -1/2 binary64) (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l))))) l))
(* -1/2 (/ Om (* l (sin ky))))
(*.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/2 binary64))
(* -1 (/ (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))) l))
(/.f64 (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l)))) (neg.f64 l))
(* -1 (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky))))) l))
(/.f64 (fma.f64 (neg.f64 (sin.f64 ky)) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (/ (* (sin ky) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (* Om (pow l 4)))) (+ (* -1 (/ (* (sin ky) (+ (* 1/256 (/ (pow Om 8) (pow (sin ky) 8))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (sin ky) 6))) (* 1/256 (/ (pow Om 6) (pow (sin ky) 6))))) (pow (sin ky) 2))))) (* Om (pow l 6)))) (+ (* -1/16 (/ (pow Om 3) (* (pow l 2) (pow (sin ky) 3)))) (* 1/2 (/ Om (sin ky)))))) l))
(/.f64 (fma.f64 (neg.f64 (sin.f64 ky)) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (*.f64 Om Om)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (sin.f64 ky) #s(literal 8 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)) (fma.f64 (neg.f64 (sin.f64 ky)) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (/.f64 Om (sin.f64 ky)) #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 Om Om) Om)) (*.f64 (pow.f64 (sin.f64 ky) #s(literal 3 binary64)) (*.f64 l l)))))) (neg.f64 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)) (-.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 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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.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 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.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/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #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)))))))))) 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.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 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.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/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #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))))))))))) l))
(* 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/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 (*.f64 Om 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 (*.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 (pow.f64 l #s(literal 4 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om 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))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* (pow l 2) (+ (* 4 (/ (+ (pow (sin kx) 2) (pow (sin ky) 2)) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.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 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.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))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))))))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.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)))))) Om))
(* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (pow (sin ky) 2) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) (*.f64 l l) #s(literal 1 binary64))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.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))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.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 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.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))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #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)))))))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.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))))))) Om)
(* -2 (* (/ l Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))
(* -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 (neg.f64 l) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) Om) #s(literal 2 binary64))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))) (* 2 (* (/ 1 Om) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) Om) #s(literal 2 binary64)))))
(* -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 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 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 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 5 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l 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 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) Om) #s(literal 2 binary64))))))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* 4 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2)))
(*.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64))
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))
(*.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))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l))
(/.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om 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))))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) l))
(/.f64 (fma.f64 (neg.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky))) (/.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 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om 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)))))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3)))) (* Om (pow l 4))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))) (* 1/256 (/ (pow Om 6) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* Om (pow l 6))) (sqrt (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) l))
(/.f64 (fma.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (+.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (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 (pow.f64 l #s(literal 4 binary64)) Om))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.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 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om 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)))))))) (neg.f64 l))

rewrite236.0ms (1.7%)

Memory
-25.0MiB live, 250.9MiB allocated
Rules
3 430×lower-fma.f32
3 422×lower-fma.f64
3 402×lower-*.f32
3 376×lower-*.f64
2 522×lower-pow.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
077632
0138626
1512521
24319504
08189490
Stop Event
iter limit
node limit
iter limit
Counts
27 → 774
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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))))
(-.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 kx 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(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #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)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))))
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om))
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))))))
Outputs
#s(literal 1/2 binary64)
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)))) (/.f64 #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/2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (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/2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #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 kx))))) #s(literal 1/4 binary64))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (+.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)) (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #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 kx))))) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (*.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (fma.f64 (+.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 (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))) (neg.f64 (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/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (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/2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64))))))
(fma.f64 (neg.f64 (sin.f64 kx)) (sin.f64 kx) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 kx) (neg.f64 (sin.f64 kx)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (neg.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)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 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/2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(-.f64 (fma.f64 (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))))
(-.f64 (*.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/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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)))
(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))
(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 (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 #s(approx (* (/ 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)))
(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)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #s(literal 1/4 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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) #s(literal 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(pow.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/4 binary64))) (neg.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(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)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/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)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #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)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))) (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(+.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 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 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))))
(*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 l #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (pow.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 l Om))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (pow.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) (/.f64 l Om))
(*.f64 (pow.f64 (*.f64 (*.f64 l #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 l #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 l Om))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 #s(literal -2 binary64) l)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 Om)) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)))
(*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64)))
(*.f64 (*.f64 l #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (/.f64 l Om) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (*.f64 l l) (pow.f64 (/.f64 #s(literal 2 binary64) Om) #s(literal 2 binary64)))
(*.f64 (*.f64 l l) (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) Om)) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 l Om))
(*.f64 #s(literal 4 binary64) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 l l)))
(*.f64 (/.f64 l Om) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))
(*.f64 l (pow.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 #s(literal 1 binary64) Om)) #s(literal 1 binary64)))
(*.f64 l (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 #s(literal 1 binary64) Om)))
(*.f64 #s(literal 2 binary64) (pow.f64 (*.f64 (/.f64 l Om) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 l Om) #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64))))
(pow.f64 (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) #s(literal -2 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(pow.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) Om)
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) l)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 Om (*.f64 l #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64)) (neg.f64 Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 l #s(literal 2 binary64))) Om)
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) Om)
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) (neg.f64 Om)))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) l) (*.f64 l #s(literal 2 binary64))) (*.f64 (neg.f64 Om) Om))
(/.f64 (*.f64 (*.f64 #s(literal -2 binary64) l) #s(literal 1 binary64)) (*.f64 (neg.f64 Om) (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 l #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (*.f64 (*.f64 l #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 Om (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) l)) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (neg.f64 Om)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 l #s(literal 2 binary64))) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) (neg.f64 l)) (*.f64 (neg.f64 Om) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) #s(literal 1 binary64)) (*.f64 Om (/.f64 Om l)))
(/.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (/.f64 Om (*.f64 l #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) Om)
(/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))
(/.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 Om l))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 Om (*.f64 l #s(literal 2 binary64))) (/.f64 Om (*.f64 l #s(literal 2 binary64)))))
(exp.f64 (+.f64 (log.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (log.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 2 binary64)))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l 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 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l 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/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l 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 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64)) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (/.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(+.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 kx)))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx ky)) (cos.f64 (+.f64 kx ky))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (*.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) (cos.f64 (+.f64 kx kx))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (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 (sin.f64 kx) #s(literal 4 binary64)))))
(pow.f64 (/.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 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))
(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 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (+.f64 kx kx))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 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 (neg.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (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 (sin.f64 kx) #s(literal 4 binary64)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 (+.f64 kx kx)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 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 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 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 (sin.f64 kx) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 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 #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 (sin.f64 kx) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 6 binary64)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (sin.f64 kx) (sin.f64 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) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 kx kx))) (/.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 (+.f64 kx kx))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(+.f64 (+.f64 (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))))
(+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1/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/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om))
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(pow.f64 (/.f64 Om (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l)) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 l Om)) (cos.f64 (+.f64 kx kx)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 l Om)) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (/.f64 Om l))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 (+.f64 kx kx)))
(/.f64 (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l)) (neg.f64 Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (neg.f64 l)) (*.f64 (cos.f64 (+.f64 kx kx)) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) l) (*.f64 (cos.f64 (+.f64 kx kx)) Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) (/.f64 Om l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (neg.f64 l)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) l) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (/.f64 Om l)))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (neg.f64 Om) (cos.f64 (+.f64 kx kx))))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (neg.f64 Om) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 l (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 Om (cos.f64 (+.f64 kx kx))))
(/.f64 (*.f64 l (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 Om (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 Om l) (cos.f64 (+.f64 kx kx))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (/.f64 Om l) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l) Om)
(/.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 Om l))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l)))
(fma.f64 (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)) (/.f64 l Om)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 l Om) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)))
(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) #s(literal 1/2 binary64) (*.f64 (/.f64 l Om) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (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)) (/.f64 l Om)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 l Om)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)))
(+.f64 (*.f64 (/.f64 l Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (/.f64 l 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) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.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)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64)) (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 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 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal -1 binary64))))
(exp.f64 (log1p.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (pow.f64 (/.f64 Om (sin.f64 kx)) #s(literal -1 binary64)) (pow.f64 (/.f64 Om (sin.f64 kx)) #s(literal -1 binary64)))
(*.f64 (/.f64 (sin.f64 kx) Om) (/.f64 (sin.f64 kx) Om))
(*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 Om) Om)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)))
(*.f64 (/.f64 #s(literal 1 binary64) Om) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om))
(*.f64 (sin.f64 kx) (/.f64 (sin.f64 kx) (*.f64 Om Om)))
(*.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 #s(literal 1 binary64) (*.f64 Om Om))))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)))
(pow.f64 (/.f64 Om (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sin.f64 kx) Om) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 Om Om) (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)) #s(literal 1 binary64)) (*.f64 Om Om))
(/.f64 (neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) (neg.f64 Om))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (neg.f64 Om) Om)))
(/.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) Om)
(/.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 Om) Om))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))
(/.f64 #s(literal 1 binary64) (/.f64 Om (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 Om Om)))
(neg.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 Om) Om)))
(exp.f64 (-.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) (*.f64 (log.f64 Om) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 Om Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) (*.f64 l #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)) l)
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) l))
(*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) l))
(*.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(*.f64 l (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)) #s(literal 4 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (cos.f64 (+.f64 kx kx)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 (+.f64 kx kx)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(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 Om)) l) (*.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 Om)) l)))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) 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 Om)) l) (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 Om)) l) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(+.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 Om)) l)) (*.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 Om)) l)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) 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 Om)) l) (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 Om)) l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
#s(approx (pow (sin ky) 2) (*.f64 ky ky))
(*.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log1p.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))
(*.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)))
(*.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))
(*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
(/.f64 (*.f64 (fma.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (-.f64 (pow.f64 (sin.f64 kx) #s(literal 4 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (pow.f64 (sin.f64 kx) #s(literal 6 binary64)))) (fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (-.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (pow.f64 (sin.f64 kx) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) (-.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 6 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 Om Om) Om))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))) (+.f64 (pow.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) (*.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 4 binary64) l)) l (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 (sin.f64 kx) (*.f64 (/.f64 l Om) #s(literal 2 binary64))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (sin.f64 kx)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 #s(literal 4 binary64) l) (*.f64 l (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 l l) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 Om Om)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 4 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 (*.f64 l l) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 l l)) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (*.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))
(*.f64 (pow.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) (-.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l 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) (neg.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(pow.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 (fma.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log1p.f64 (*.f64 (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om))))))

eval577.0ms (4.1%)

Memory
-92.7MiB live, 610.1MiB allocated
Compiler

Compiled 94 546 to 7 505 computations (92.1% saved)

prune265.0ms (1.9%)

Memory
-21.4MiB live, 555.9MiB allocated
Pruning

16 alts after pruning (15 fresh and 1 done)

PrunedKeptTotal
New1 965151 980
Fresh505
Picked415
Done000
Total1 974161 990
Accuracy
100.0%
Counts
1 990 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
80.9%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
67.6%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
83.9%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #s(literal 1 binary64)))))))
88.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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
32.8%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) #s(approx (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (fma.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))) #s(literal 1 binary64)))))))
76.0%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))))
87.3%
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
89.5%
(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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))))
39.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
73.6%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
60.1%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
66.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
49.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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/4 binary64) #s(literal 1/2 binary64)))))
49.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))))
57.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(literal 1/2 binary64)))
48.9%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64))))
Compiler

Compiled 987 to 634 computations (35.8% saved)

simplify143.0ms (1%)

Memory
22.5MiB live, 216.5MiB allocated
Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff128
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))
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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))))))
cost-diff512
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff128
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))))
cost-diff576
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
cost-diff704
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
cost-diff0
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
cost-diff384
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))
cost-diff0
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
cost-diff192
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
cost-diff320
(-.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 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))))
cost-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))
Rules
6 882×lower-fma.f32
6 868×lower-fma.f64
6 240×lower-*.f32
6 210×lower-*.f64
1 768×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01011377
01681346
12951306
26881288
327141248
458741248
082581191
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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 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 (*.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 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
(-.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 kx kx)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 ky 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)))
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
kx
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
#s(literal 4 binary64)
(/.f64 l Om)
l
Om
(/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
kx
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
(-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))
#s(literal 1/2 binary64)
#s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))
(cos.f64 (*.f64 ky #s(literal 2 binary64)))
(*.f64 ky #s(literal 2 binary64))
ky
(*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))
#s(literal 1/2 binary64)
(-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
ky
#s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64))
#s(literal -1/3 binary64)
(*.f64 kx kx)
kx
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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #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 (*.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 binary64))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal 1 binary64)) #s(literal 1 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(*.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 Om))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
(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) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 ky ky))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
ky
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))
(*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
kx
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
#s(literal 4 binary64)
(/.f64 l Om)
l
Om
(/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(cos.f64 (+.f64 kx kx))
(+.f64 kx kx)
kx
#s(literal 1/2 binary64)
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 #s(literal 4 binary64) (*.f64 Om Om))) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
(*.f64 (*.f64 (/.f64 l Om) l) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))) #s(literal -4 binary64) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))))
#s(literal 1/2 binary64)
#s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
#s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 ky #s(literal 2 binary64)))
(cos.f64 (+.f64 ky ky))
(*.f64 ky #s(literal 2 binary64))
(+.f64 ky ky)
ky
(*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 4 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 4 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 4 binary64) #s(literal 2 binary64)) (/.f64 (*.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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 4 binary64) #s(literal 2 binary64)) (/.f64 (*.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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 4 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 4 binary64) #s(literal 2 binary64)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))))
(*.f64 (fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (/.f64 l Om))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))
(fma.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 ky ky))) #s(literal 1/2 binary64) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
#s(literal 1/2 binary64)
(-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))
(neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 ky ky)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky)))
(*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64))
(cos.f64 (+.f64 ky ky))
(+.f64 ky ky)
ky
#s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
#s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)
(fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64))
(fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64))
#s(literal -1/3 binary64)
(*.f64 kx kx)
kx

localize509.0ms (3.6%)

Memory
6.8MiB live, 890.9MiB allocated
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy3.842870582293312
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))
accuracy12.57118197205254
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))
accuracy16.31815749543296
#s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
accuracy3.157831638058665
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
accuracy12.57118197205254
(-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))
accuracy14.946922876403365
#s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
accuracy7.421699908726502
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
accuracy7.893181352500419
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))
accuracy7.980217228320559
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))))
accuracy18.728506974465233
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
accuracy0.01171875
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
accuracy25.94479533193299
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))
accuracy3.842870582293312
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
accuracy12.57118197205254
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
accuracy18.728506974465233
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
Samples
218.0ms110×2valid
107.0ms75×1valid
46.0ms71×0valid
Compiler

Compiled 1 205 to 77 computations (93.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 299.0ms
ival-mult: 64.0ms (21.4% of total)
ival-cos: 63.0ms (21.1% of total)
adjust: 38.0ms (12.7% of total)
ival-add: 38.0ms (12.7% of total)
ival-sqrt: 27.0ms (9% of total)
ival-div: 25.0ms (8.4% of total)
ival-sin: 18.0ms (6% of total)
ival-pow2: 11.0ms (3.7% of total)
ival-sub: 10.0ms (3.3% of total)
const: 4.0ms (1.3% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series239.0ms (1.7%)

Memory
-9.5MiB live, 428.9MiB allocated
Counts
28 → 1 032
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())
#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<representation binary64>) () ())
Outputs
#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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (* 2 ky))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1))) (taylor 0 kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om))) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om))))) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow kx 2) (pow l 2)) Om))))))) (taylor 0 kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<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 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/2 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (* 2 ky))) (taylor 0 kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1))) (taylor 0 kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1))) (taylor 0 kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.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 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.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 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.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 (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf kx) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.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 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (patch (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor -inf kx) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) (patch #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf Om) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (* 2 kx))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1))) (taylor 0 ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))) (* (pow ky 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow ky 2) (pow l 2)) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om))) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om))))) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow ky 2) (pow l 2)) Om))))))) (taylor 0 ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (cos (* 2 kx))) (taylor 0 ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1))) (taylor 0 ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1))) (taylor 0 ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2) (taylor inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt (-.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 kx kx))))) (patch (-.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 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (patch (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))) (taylor -inf ky) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)) (taylor -inf ky) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) (patch (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2) (taylor -inf ky) (#s(alt #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (patch #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (patch (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor 0 l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))) (patch (sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) (patch #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)) (taylor -inf l) (#s(alt (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (patch (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<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 #s(literal 1/2 binary64) (-.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 kx kx))))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) (patch (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
20.0ms
l
@0
((+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* 1/2 (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (/ 1 2) (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1))))) (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (+ (* -1/2 (cos (+ kx kx))) 1/2) (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1)) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))))
15.0ms
kx
@0
((+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* 1/2 (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (/ 1 2) (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1))))) (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (+ (* -1/2 (cos (+ kx kx))) 1/2) (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1)) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))))
14.0ms
Om
@inf
((+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* 1/2 (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (/ 1 2) (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1))))) (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (+ (* -1/2 (cos (+ kx kx))) 1/2) (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1)) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))))
11.0ms
kx
@-inf
((+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* 1/2 (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (/ 1 2) (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1))))) (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (+ (* -1/2 (cos (+ kx kx))) 1/2) (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1)) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))))
8.0ms
kx
@inf
((+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* 1/2 (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1) (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (/ 1 2) (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1))))) (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (+ (* -1/2 (cos (+ kx kx))) 1/2) (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (sqrt (+ (* (* (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (* (* (/ l Om) 4) l)) (/ 1 Om)) 1)) (- 1/2 (* 1/2 (cos (+ kx kx)))) (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))))

simplify377.0ms (2.7%)

Memory
14.2MiB live, 564.3MiB allocated
Algorithm
egg-herbie
Rules
8 994×lower-fma.f64
8 994×lower-fma.f32
7 206×lower-*.f64
7 206×lower-*.f32
5 734×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0154244780
1517143719
0858841672
Stop Event
iter limit
node limit
Counts
1 032 → 1 032
Calls
Call 1
Inputs
(+ 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/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 (cos (* 2 ky)))
(+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(* (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))))))))))))))))
(* 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
(+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(* (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))))))))))))))))
(* 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
(+ 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 (* 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/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))))))))))))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow kx 2) (pow l 2)) Om)))))))
(+ 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/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/2 (cos (* 2 ky))))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(pow kx 2)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(/ (* 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))
(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
(+ 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)))))))))))
(* 1/2 (cos (* 2 ky)))
(+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(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))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(/ (* 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))
(+ 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/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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- 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)))))
(* (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)))))))))
(* 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 (* 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 (/ (* (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/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/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/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 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/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))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(+ 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/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 (+ (* 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/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))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 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))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(- 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))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 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/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 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- 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)))))
(* (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)))))))))
(* 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 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (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/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/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (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/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))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(+ 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/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 (+ (* 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 (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 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 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 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(- 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 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(* 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/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))))))))))
(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))))))))))))))
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))))))))))
(* 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 Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 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) (* 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))))))))))))))
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/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))
(* 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/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))))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 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/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))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/ (* 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)
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/ (* 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)
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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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
(+ 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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 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 (/ (* (pow l 2) (+ 1/2 (* -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)))
(+ (* -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)))))
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) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 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))))
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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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
(+ 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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 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 (/ (* (pow l 2) (+ 1/2 (* -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)))
(+ (* -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)))))
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) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 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))))
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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
(+ 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/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 (cos (* 2 kx)))
(+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(* (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))))))))))))))))
(* 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))))))))))))
(* (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))))))))))))))))
(* 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 (* 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/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))))))))))))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om))
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow ky 2) (pow l 2)) Om)))))))
(+ 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/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/2 (cos (* 2 kx))))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(/ (* 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))
(* 1/2 (cos (* 2 kx)))
(+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(/ (* 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))
(+ 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/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 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- 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)))))
(* (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)))))))))
(* 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))))))))
(* (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/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 (* 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/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))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(+ 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/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 (+ (* 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 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 (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 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- 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)))))
(* (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/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 (+ 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/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 (* 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 (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))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(+ 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 (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/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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (- 1 (+ (* 1/2 (cos (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 (* 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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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))))))))))
(* (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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
1
(+ 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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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
(+ 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 (/ (* (pow l 2) (+ 1/2 (* -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))))))))
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
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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))))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(/ (* 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)
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(/ (* 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)
(* 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))))
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))))))))))))
(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))))))
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))))))))))))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 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))))))
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 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(* 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))))
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))))))))))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 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))))
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))))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(/ (* 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)
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(/ (* 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)
(* 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))))
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)))
(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)))
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)))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 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 (/ (+ (* 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)))
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 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)))
(* 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))))
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)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(* 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))))
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)))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(/ (* 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)
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(/ (* 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)
Outputs
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 kx) kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (cos (* 2 ky)))
(*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 kx) kx))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal -1 binary64)) (*.f64 kx kx)))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 kx kx) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal -1 binary64)) (*.f64 kx kx)))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 kx) kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 kx) kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (*.f64 (neg.f64 kx) kx) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 kx kx)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 kx kx) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 kx kx) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 kx) kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om))
(*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64))
(+ (* 4 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) Om))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 kx kx)))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)) (* (pow kx 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow kx 2) (pow l 2)) Om)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om)) #s(literal 4 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 kx kx) (/.f64 (*.f64 l l) Om)) #s(literal 8/45 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal -4/3 binary64))) (*.f64 kx kx) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 kx kx)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 (neg.f64 kx) kx) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 kx kx) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 kx kx)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal 2/45 binary64))) (*.f64 kx kx) (/.f64 l Om)) (*.f64 kx kx)))
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) #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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 kx kx) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
(* 1/2 (cos (* 2 ky)))
(*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 kx) kx))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* 1/3 (pow kx 2)) 1)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal -1 binary64)) (*.f64 kx kx)))
(+ (* 1/2 (cos (* 2 ky))) (* (pow kx 2) (- (* (pow kx 2) (+ 1/3 (* -2/45 (pow kx 2)))) 1)))
(fma.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 #s(literal -2/45 binary64) (*.f64 kx kx) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal -1 binary64)) (*.f64 kx kx)))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 kx kx) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 kx kx)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal 2/45 binary64))) (*.f64 kx kx) (/.f64 l Om)) (*.f64 kx kx)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1/2 (* 1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) (*.f64 Om Om))
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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (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 (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 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 l l))) #s(literal -1/32 binary64))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 l l))) #s(literal -1/32 binary64))) Om (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) Om (sqrt.f64 #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))) (* 1/2 (cos (* 2 ky))))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(* 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(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 (sqrt.f64 #s(literal 1/2 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))))) (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 (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 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.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 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (*.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))))))) Om (sqrt.f64 #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 (*.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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) Om #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 (fma.f64 (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 (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 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) Om #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 kx)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))
(fma.f64 (fma.f64 (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) (*.f64 Om Om))
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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) (*.f64 Om Om))
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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/2 binary64))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))
(*.f64 (fma.f64 (fma.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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/16 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/2 binary64))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 7 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (pow.f64 l #s(literal 5 binary64))) #s(literal 3/256 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/16 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/2 binary64))) Om)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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)))))
(fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 l l)) (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.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 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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)))))
(fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 l l)) (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.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 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* 1/2 (cos (* 2 kx)))
(*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 ky) ky))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal -1 binary64)) (*.f64 ky ky)))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal -1 binary64)) (*.f64 ky ky)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) Om)
(+ (* 4 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) Om))))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* -4/3 (/ (* (pow ky 2) (pow l 2)) Om)) (* 4 (/ (pow l 2) Om)))))
(fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 ky ky) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) Om))
(+ (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)) (* (pow ky 2) (+ (* 4 (/ (pow l 2) Om)) (* (pow ky 2) (+ (* -4/3 (/ (pow l 2) Om)) (* 8/45 (/ (* (pow ky 2) (pow l 2)) Om)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) Om)) #s(literal 8/45 binary64) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal -4/3 binary64))) (*.f64 ky ky) (*.f64 (/.f64 (*.f64 l l) Om) #s(literal 4 binary64))) (*.f64 ky ky) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)
(*.f64 l (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (/.f64 (*.f64 (*.f64 ky ky) l) 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))
(+ (* (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal 2/45 binary64) (*.f64 (/.f64 l Om) #s(literal -1/3 binary64))) (*.f64 ky ky) (/.f64 l Om)) (*.f64 ky ky)))
(* 1/2 (cos (* 2 kx)))
(*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))
(+ (* -1 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 ky) ky))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* 1/3 (pow ky 2)) 1)))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (*.f64 ky ky) #s(literal 1/3 binary64) #s(literal -1 binary64)) (*.f64 ky ky)))
(+ (* 1/2 (cos (* 2 kx))) (* (pow ky 2) (- (* (pow ky 2) (+ 1/3 (* -2/45 (pow ky 2)))) 1)))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -2/45 binary64) #s(literal 1/3 binary64)) (*.f64 ky ky) #s(literal -1 binary64)) (*.f64 ky ky)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)
(*.f64 l (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (/.f64 (*.f64 (*.f64 ky ky) l) 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))
(+ (* (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal 2/45 binary64) (*.f64 (/.f64 l Om) #s(literal -1/3 binary64))) (*.f64 ky ky) (/.f64 l Om)) (*.f64 ky ky)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(* (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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))) 1/2)
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal -1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (* (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 (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)) (/.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 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)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (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)))))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 l l)))) #s(literal -1/32 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))))))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))))) #s(literal -3/64 binary64)) (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #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))) (* 1/2 (cos (* 2 ky))))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))))
(* 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (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))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 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)))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #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 (*.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))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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/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 (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.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 (pow.f64 l #s(literal 5 binary64)) Om))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))) l)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l)
(/.f64 (fma.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) l)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))) l)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))) l)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) 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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) l))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))))) #s(literal -3/64 binary64)) l)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (neg.f64 l))) 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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) l))
(* 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) l)) #s(literal 1/32 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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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)) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 Om Om) (/.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))))) #s(literal -1/32 binary64))) (neg.f64 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 (*.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 (*.f64 Om 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 (*.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 (pow.f64 l #s(literal 4 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om 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 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) l))
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om)
(* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) (*.f64 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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))) 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))) l))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))
(/.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l))
(/.f64 (fma.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (neg.f64 l))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))))))))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) Om))

rewrite204.0ms (1.5%)

Memory
-8.8MiB live, 343.2MiB allocated
Rules
4 920×lower-fma.f32
4 906×lower-fma.f64
4 428×lower-*.f32
4 400×lower-*.f64
2 334×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
098803
0161779
1596603
25077603
08200590
Stop Event
iter limit
node limit
iter limit
Counts
28 → 667
Calls
Call 1
Inputs
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64))))))
(-.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 kx kx)))))
(-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) #s(literal 2 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))))))
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64))))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx))))))) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))))
#s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))))))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 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)) #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) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.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 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (sin.f64 ky)) (sin.f64 ky) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.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 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 #s(literal 2 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) l (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) l) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) l) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 (sin.f64 kx) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 kx)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 kx)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (sin.f64 ky) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 (sin.f64 ky) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) Om) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.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 l Om)) #s(literal 4 binary64)) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 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)))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 1 binary64))
(fma.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 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.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 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.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 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.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 l Om)) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fma.f64 (/.f64 l Om) (*.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 l Om)) #s(literal 4 binary64)) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.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 l Om)) #s(literal 4 binary64))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (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 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 1 binary64))
(+.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #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 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #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 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #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 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)))) (/.f64 #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/2 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (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/2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #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 kx))))) #s(literal 1/4 binary64))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (+.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)) (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (+.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) #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 kx))))) #s(literal 1/4 binary64)) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (*.f64 #s(literal -1 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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64))))) (neg.f64 (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/2 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 4 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/2 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (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/2 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (neg.f64 (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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (fma.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64) (neg.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64))))))
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (neg.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)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(-.f64 (-.f64 (*.f64 (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))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 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/2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 (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 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(-.f64 (fma.f64 (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))))
(-.f64 (*.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/2 binary64)))
(+.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
(*.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 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (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 (sin.f64 ky) #s(literal 4 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))
(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 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))))
(/.f64 (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 (neg.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (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 (sin.f64 ky) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (cos.f64 (+.f64 kx kx))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (cos.f64 (+.f64 kx kx)))
(/.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 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(/.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 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 (sin.f64 ky) #s(literal 4 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 #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 (sin.f64 ky) #s(literal 4 binary64))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (pow.f64 (sin.f64 ky) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 kx kx)) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (pow.f64 (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 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))) #s(literal 1 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (sin.f64 ky) (sin.f64 ky) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(fma.f64 (sin.f64 kx) (sin.f64 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) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 kx kx))) (/.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (cos.f64 (+.f64 kx kx))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 (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 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))
(+.f64 (+.f64 (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))
(+.f64 (+.f64 (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))))
(+.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) #s(literal 1/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/2 binary64) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (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 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (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 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (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 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (sin.f64 ky)) (sin.f64 ky) #s(literal 1 binary64))
(fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 #s(literal 2 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (sin.f64 kx)) (sin.f64 kx) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) l) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 1 binary64))
(fma.f64 (*.f64 (sin.f64 kx) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 (sin.f64 kx) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 kx)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 kx)) #s(literal 1 binary64))
(fma.f64 (*.f64 (sin.f64 ky) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) (*.f64 (sin.f64 ky) (*.f64 #s(literal 2 binary64) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64))
(fma.f64 (sin.f64 ky) (*.f64 (sin.f64 ky) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (sin.f64 kx) (*.f64 (sin.f64 kx) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) l)) #s(literal 1 binary64))
(fma.f64 l (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om)) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -3/2 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 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(pow.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64))) (fma.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1/4 binary64))) (neg.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -3/2 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 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -3/2 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 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64))) (fma.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #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) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
#s(literal 1/2 binary64)
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) Om) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) Om)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1/8 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l) (*.f64 #s(literal 4 binary64) (/.f64 l Om)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) l))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) l))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) (*.f64 l #s(literal 1 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) l)
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 l (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) l) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 l (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 Om)) l) (*.f64 (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) 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 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) 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 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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))))
(fma.f64 (*.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) 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) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) 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 Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))))
(pow.f64 (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (*.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 6 binary64)) (*.f64 (*.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) (+.f64 (pow.f64 (sin.f64 ky) #s(literal 4 binary64)) (-.f64 (*.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64))) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (pow.f64 (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 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))) #s(literal 1 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/2 binary64))
(fma.f64 (sin.f64 ky) (sin.f64 ky) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(fma.f64 (sin.f64 kx) (sin.f64 kx) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))))
(-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (neg.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) #s(literal 1/2 binary64))
(+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (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 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal -1/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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.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))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 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) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 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) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 ky)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 kx)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.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) (cos.f64 (+.f64 kx kx))))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #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 4 binary64) 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)))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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))))) #s(literal 1/2 binary64)))
(*.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))) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om))
(*.f64 (/.f64 l Om) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.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))) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 Om (*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) l)) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (/.f64 l Om)) (cos.f64 (+.f64 kx kx)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 l Om)) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (neg.f64 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)))) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (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)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (cos.f64 (+.f64 kx kx)))
(/.f64 (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)))
(/.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))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (neg.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))) l)) (neg.f64 Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) (neg.f64 l)) (*.f64 (cos.f64 (+.f64 kx kx)) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) (/.f64 Om l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64))) l) (*.f64 (cos.f64 (+.f64 kx kx)) Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (neg.f64 l)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) (/.f64 Om l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) l) (*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64)) Om))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (neg.f64 Om) (cos.f64 (+.f64 kx kx))))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (neg.f64 Om) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 Om l) (cos.f64 (+.f64 kx kx))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (/.f64 Om l) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.f64 (*.f64 l (-.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 2 binary64)))) (*.f64 Om (cos.f64 (+.f64 kx kx))))
(/.f64 (*.f64 l (-.f64 #s(literal 1/8 binary64) (pow.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (*.f64 Om (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))) (cos.f64 (+.f64 kx kx)) #s(literal 1/4 binary64))))
(/.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))) l) Om)
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 (+.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) 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 l))
(fma.f64 (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)) (/.f64 l Om)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 l Om) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)))
(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) #s(literal 1/2 binary64) (*.f64 (/.f64 l Om) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (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)) (/.f64 l Om)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 l Om)) (*.f64 (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64)))) (/.f64 l Om)))
(+.f64 (*.f64 (/.f64 l Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (/.f64 l 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) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal -1/2 binary64))))))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (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 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))) #s(literal 1 binary64)))
(*.f64 (exp.f64 (log.f64 (sin.f64 ky))) (exp.f64 (log.f64 (sin.f64 ky))))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal -1/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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))))
(*.f64 (sin.f64 ky) (sin.f64 ky))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (exp.f64 (log.f64 (sin.f64 ky))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.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))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 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) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64)))))
(/.f64 (fma.f64 #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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 kx kx))))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 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) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 ky)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 kx)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 ky)) #s(literal 2 binary64)))
(+.f64 (*.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) (cos.f64 (+.f64 kx kx))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 6 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sin.f64 ky)) #s(literal 4 binary64)))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (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 (neg.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64)))
#s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (/.f64 (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (pow.f64 (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))) (/.f64 (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (fma.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (+.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(+.f64 (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) #s(literal 1/2 binary64)))
#s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) 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 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (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 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 l Om))
(*.f64 (/.f64 l Om) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 l (/.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 Om (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) l)) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64))) (/.f64 l Om)) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64))) (/.f64 l Om)) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (neg.f64 l) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 Om l))
(/.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(/.f64 (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)))
(/.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) l)) (neg.f64 Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64))) (neg.f64 l)) (*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (/.f64 Om l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64))) l) (*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) Om))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64))) (neg.f64 l)) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)) (neg.f64 Om)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)) (/.f64 Om l)))
(/.f64 (*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64))) l) (*.f64 (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64)) Om))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))) (*.f64 (neg.f64 Om) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(/.f64 (*.f64 (neg.f64 l) (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))) (*.f64 (neg.f64 Om) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))) (*.f64 (/.f64 Om l) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))) (*.f64 (/.f64 Om l) (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))))
(/.f64 (*.f64 l (-.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 2 binary64)))) (*.f64 Om (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))))
(/.f64 (*.f64 l (-.f64 #s(literal 1/8 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 3 binary64)))) (*.f64 Om (fma.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))) #s(literal 1/4 binary64))))
(/.f64 (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) l) Om)
(/.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (/.f64 Om l))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 (+.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) l)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 l Om) (*.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (/.f64 l Om)))
(fma.f64 #s(literal 1/2 binary64) (/.f64 l Om) (*.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) (/.f64 l Om)))
(fma.f64 (/.f64 l Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(fma.f64 (/.f64 l Om) #s(literal 1/2 binary64) (*.f64 (/.f64 l Om) (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))))
(+.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (/.f64 l Om)) (*.f64 #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)) (/.f64 l Om)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 l Om)) (*.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx)))) (/.f64 l Om)))
(+.f64 (*.f64 (/.f64 l Om) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))
(+.f64 (*.f64 (/.f64 l Om) #s(literal 1/2 binary64)) (*.f64 (/.f64 l Om) (neg.f64 (-.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (*.f64 (fma.f64 (*.f64 kx kx) #s(literal -1/3 binary64) #s(literal 1 binary64)) kx) kx))))))

eval333.0ms (2.4%)

Memory
6.6MiB live, 635.2MiB allocated
Compiler

Compiled 83 777 to 6 618 computations (92.1% saved)

prune391.0ms (2.8%)

Memory
30.6MiB live, 475.4MiB allocated
Pruning

18 alts after pruning (15 fresh and 3 done)

PrunedKeptTotal
New1 688121 700
Fresh7310
Picked325
Done011
Total1 698181 716
Accuracy
100.0%
Counts
1 716 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
80.9%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
67.6%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
83.9%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #s(literal 1 binary64)))))))
88.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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
31.6%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
76.0%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
89.1%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
87.3%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
73.6%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))))
39.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
60.1%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
66.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
71.7%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
16.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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
49.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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal 1/4 binary64) #s(literal 1/2 binary64)))))
49.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))))
57.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(literal 1/2 binary64)))
39.0%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
Compiler

Compiled 1 006 to 654 computations (35% saved)

simplify160.0ms (1.1%)

Memory
-11.1MiB live, 144.3MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
cost-diff128
(*.f64 kx #s(literal 2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
cost-diff128
(*.f64 kx #s(literal 2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
cost-diff128
(*.f64 kx #s(literal 2 binary64))
cost-diff192
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
cost-diff0
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
cost-diff384
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))
cost-diff128
(*.f64 kx #s(literal 2 binary64))
cost-diff128
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))))))
cost-diff384
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))
Rules
6 940×lower-fma.f32
6 920×lower-fma.f64
5 814×lower-*.f32
5 784×lower-*.f64
2 088×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01041718
01631683
13211645
26901609
318981561
442751555
573091555
082121488
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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))))))
#s(literal 1/2 binary64)
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))
#s(literal 1 binary64)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))
(*.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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(*.f64 #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 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
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
#s(literal 4 binary64)
(/.f64 l Om)
l
Om
(/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om)
#s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx))
(*.f64 kx kx)
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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))))
#s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #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) #s(literal 1/2 binary64))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(*.f64 kx #s(literal 2 binary64))
kx
#s(literal 2 binary64)
#s(literal -1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
ky
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(*.f64 kx #s(literal 2 binary64))
kx
#s(literal 2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))
(*.f64 ky ky)
ky
#s(literal -1/3 binary64)
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(*.f64 kx #s(literal 2 binary64))
kx
#s(literal 2 binary64)
#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) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (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) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))) (/.f64 l Om))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))
(*.f64 (+.f64 (cos.f64 (+.f64 ky ky)) (cos.f64 (+.f64 kx kx))) #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 ky)) (cos.f64 (+.f64 kx kx)))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(cos.f64 (+.f64 kx kx))
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
kx
#s(literal 2 binary64)
(cos.f64 (*.f64 ky #s(literal 2 binary64)))
(cos.f64 (+.f64 ky ky))
(*.f64 ky #s(literal 2 binary64))
(+.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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))
#s(literal 1 binary64)
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))
(fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
#s(literal 4 binary64)
(/.f64 l Om)
l
Om
(/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om)
#s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx))
(*.f64 kx kx)
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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (*.f64 (/.f64 Om l) #s(literal 1/4 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (*.f64 (/.f64 Om l) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
#s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
#s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (*.f64 (/.f64 Om l) #s(literal 1/4 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))) (*.f64 (/.f64 Om l) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/4 binary64) (/.f64 Om l))
(*.f64 (/.f64 Om l) #s(literal 1/4 binary64))
#s(literal 1/4 binary64)
(/.f64 Om l)
Om
l
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))))
#s(literal 1 binary64)
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(cos.f64 (+.f64 kx kx))
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
kx
#s(literal 2 binary64)
#s(literal -1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))) (/.f64 l Om))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 ky ky #s(literal 1/2 binary64)))
ky
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(cos.f64 (+.f64 kx kx))
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
kx
#s(literal 2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #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) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 Om Om)) (*.f64 l l)) #s(literal 1 binary64))
(*.f64 (/.f64 l Om) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 l Om))
(/.f64 l Om)
l
Om
#s(literal 4 binary64)
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))) (/.f64 l Om))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1/2 binary64)))
(fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64))
(*.f64 ky ky)
ky
#s(literal -1/3 binary64)
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(cos.f64 (*.f64 kx #s(literal 2 binary64)))
(cos.f64 (+.f64 kx kx))
(*.f64 kx #s(literal 2 binary64))
(+.f64 kx kx)
kx
#s(literal 2 binary64)
#s(literal -1/2 binary64)

localize705.0ms (5%)

Memory
-2.9MiB live, 661.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy3.842870582293312
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
accuracy18.728506974465233
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
accuracy46.18348362576498
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy3.842870582293312
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
accuracy18.728506974465233
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
accuracy44.758145360782606
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy7.421699908726502
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))))
accuracy18.728506974465233
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
accuracy25.85731178847248
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
accuracy38.30012971121255
#s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
accuracy7.421699908726502
#s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
accuracy7.893181352500419
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))
accuracy7.980217228320559
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))))
accuracy16.025825122968634
#s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx))
accuracy0.5524027489368689
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
accuracy3.842870582293312
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
accuracy11.479361721048884
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))
accuracy12.73639070926424
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
Samples
407.0ms121×2valid
105.0ms65×1valid
65.0ms70×0valid
Compiler

Compiled 1 226 to 81 computations (93.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 442.0ms
ival-cos: 105.0ms (23.8% of total)
ival-mult: 98.0ms (22.2% of total)
adjust: 63.0ms (14.3% of total)
ival-add: 57.0ms (12.9% of total)
ival-div: 49.0ms (11.1% of total)
ival-sqrt: 21.0ms (4.8% of total)
ival-sub: 15.0ms (3.4% of total)
ival-sin: 15.0ms (3.4% of total)
ival-pow2: 12.0ms (2.7% of total)
const: 6.0ms (1.4% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series279.0ms (2%)

Memory
26.0MiB live, 294.7MiB allocated
Counts
31 → 1 164
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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())
#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())
#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())
#s(alt (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) (patch (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())
Outputs
#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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ 1 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (pow kx 2)) (* 1/2 (+ 1 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (+ 1 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (+ 1 (cos (* 2 ky))))) (taylor 0 kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor 0 kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor 0 kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor 0 kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor 0 kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2)))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))))))) (taylor 0 kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (pow kx 2)) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* 1/3 (pow kx 2))) (pow kx 2)) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow kx 2) (+ 1/3 (* 1/15 (pow kx 2))))) (pow kx 2)) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow kx 2) (+ 1/3 (* (pow kx 2) (+ 1/15 (* 2/189 (pow kx 2))))))) (pow kx 2)) (taylor 0 kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (pow kx 2) (taylor 0 kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.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 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.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 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2)))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* -1/2 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow kx 2) (+ (* -2 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -1/2 (* (pow kx 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (* -4/3 (/ (pow l 2) (pow Om 2))))) (pow Om 2))) (+ (* 8/45 (/ (pow l 2) (pow Om 2))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4)))))) (pow Om 2))) (* 16/3 (/ (pow l 4) (pow Om 4)))))))) (* -1/2 (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 kx) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* 1/6 (pow kx 2))) kx) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow kx 2) (+ 1/6 (* 7/360 (pow kx 2))))) kx) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ 1 (* (pow kx 2) (+ 1/6 (* (pow kx 2) (+ 7/360 (* 31/15120 (pow kx 2))))))) kx) (taylor 0 kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow kx 2) (taylor 0 kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2)))) (taylor 0 kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky)))) (taylor 0 kx) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))))))) (taylor 0 kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (taylor inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf kx) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf kx) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor -inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor -inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor -inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 kx) (taylor -inf kx) (#s(alt (*.f64 kx #s(literal 2 binary64)) (patch (*.f64 kx #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))) (taylor -inf kx) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))) (taylor -inf kx) (#s(alt (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (patch (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (neg (* -2 kx))))) (taylor -inf kx) (#s(alt #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (patch #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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 (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2)))))))) (taylor -inf kx) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (taylor -inf kx) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor -inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor -inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor -inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 2 kx)))) (taylor -inf kx) (#s(alt (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf kx) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2)) (taylor 0 Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))) (taylor 0 Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor 0 Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor 0 Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) (taylor 0 Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))) (taylor 0 Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om) (taylor 0 Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 Om) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf Om) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor -inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))))) (taylor -inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6)))))) (taylor -inf Om) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))) (taylor -inf Om) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor -inf Om) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ 1 (cos (* 2 kx))))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (pow ky 2)) (* 1/2 (+ 1 (cos (* 2 kx))))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (+ 1 (cos (* 2 kx))))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (+ 1 (cos (* 2 kx))))) (taylor 0 ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (- 1/2 (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx)))) (taylor 0 ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))) (taylor 0 ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (taylor inf ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))) (taylor inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf ky) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky))))) (taylor -inf ky) (#s(alt (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) (patch (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))) #<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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx))))) (taylor -inf ky) (#s(alt #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (patch #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))) (taylor -inf ky) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #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 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #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 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #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 l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))) (taylor 0 l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))) (taylor 0 l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6)))))))) (taylor 0 l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor 0 l) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) (taylor inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l) (taylor inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) (taylor inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) (taylor inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor inf l) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2)))) (taylor -inf l) (#s(alt (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) (patch (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))) (taylor -inf l) (#s(alt (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l)) (taylor -inf l) (#s(alt (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) (patch (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #<representation binary64>) () ())) ())
#s(alt 1/2 (taylor -inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) (taylor -inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))) (taylor -inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))) (taylor -inf l) (#s(alt #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))) (taylor -inf l) (#s(alt (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) (patch (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om) (taylor -inf l) (#s(alt (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (patch (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #<representation binary64>) () ())) ())
Calls

12 calls:

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

simplify442.0ms (3.2%)

Memory
-8.4MiB live, 568.1MiB allocated
Algorithm
egg-herbie
Rules
9 082×lower-fma.f64
9 082×lower-fma.f32
7 172×lower-*.f64
7 172×lower-*.f32
5 940×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0156454408
1520653101
0870750613
Stop Event
iter limit
node limit
Counts
1 164 → 1 164
Calls
Call 1
Inputs
(+ 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/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 (* 1/2 (+ 1 (cos (* 2 ky)))))
(- (+ 1 (pow kx 2)) (* 1/2 (+ 1 (cos (* 2 ky)))))
(- (+ 1 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (+ 1 (cos (* 2 ky)))))
(- (+ 1 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (+ 1 (cos (* 2 ky)))))
(* 2 kx)
(* 2 kx)
(* 2 kx)
(* 2 kx)
1
(+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(* (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))))))))))))))))
(* 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
(+ 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 (pow kx 2))
(/ (+ 1 (* 1/3 (pow kx 2))) (pow kx 2))
(/ (+ 1 (* (pow kx 2) (+ 1/3 (* 1/15 (pow kx 2))))) (pow kx 2))
(/ (+ 1 (* (pow kx 2) (+ 1/3 (* (pow kx 2) (+ 1/15 (* 2/189 (pow kx 2))))))) (pow kx 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))))))))))))))))
(* 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 (* 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/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))))))))))))
(* (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))))))))))))))))
(+ 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/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))))))))))))
(* (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 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(/ (* 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))
(+ 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))))
(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
(+ 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)))))))))))
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 kx)
(/ (+ 1 (* 1/6 (pow kx 2))) kx)
(/ (+ 1 (* (pow kx 2) (+ 1/6 (* 7/360 (pow kx 2))))) kx)
(/ (+ 1 (* (pow kx 2) (+ 1/6 (* (pow kx 2) (+ 7/360 (* 31/15120 (pow kx 2))))))) kx)
(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 ky))))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(/ (* 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))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(/ (* 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))
(+ 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/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 (* 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)))))
(* 2 kx)
(* 2 kx)
(* 2 kx)
(* 2 kx)
(+ 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 (/ (* (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/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/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/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(* (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/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 (* 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/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))))))))
(* (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)))))))))
(+ 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/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))))))))
(* (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 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ (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/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))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt (/ 1 (+ 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 (* 2 kx))))
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 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/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 (* 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)))))
(* 2 kx)
(* 2 kx)
(* 2 kx)
(* 2 kx)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (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/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/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(* (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/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 (* 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/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))))))))
(* (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)))))))))
(+ 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/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))))))))
(* (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 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ (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/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 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt (/ 1 (+ 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 (* 2 kx))))
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(* 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/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))))))))))
(* 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 Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 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) (* 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))))))))))))))
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/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))
(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))))))))))))))
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))))))))))
(* 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/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))))))))))
(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))))))))))))))
(* 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/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))))))))))
(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))))))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/ (* 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)
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))))
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (* Om (+ (* -1/32 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/ (* 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)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/ (* 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)
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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 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 (/ (* (pow l 2) (+ 1/2 (* -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)))
(+ (* -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)))))
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) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 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)))
(+ (* -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)))))
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 (* 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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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
(+ 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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
1
(+ 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 (/ (* (pow l 2) (+ 1/2 (* -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)))
(+ (* -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)))))
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) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 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)))
(+ (* -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)))))
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 (* 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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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
(+ 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 (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 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)))
(+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(/ (* 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)
(+ 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/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 (* 1/2 (+ 1 (cos (* 2 kx)))))
(- (+ 1 (pow ky 2)) (* 1/2 (+ 1 (cos (* 2 kx)))))
(- (+ 1 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (+ 1 (cos (* 2 kx)))))
(- (+ 1 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (+ 1 (cos (* 2 kx)))))
(* (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))))))))))))))))
(* 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))))))))))))
(* (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))))))))))))))))
(* 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 (* 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/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))))))))))))
(* (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))))))))))))))))
(+ 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/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))))))))))))
(* (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 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(/ (* 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))
(+ 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))))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(/ (* 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))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(/ (* 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))
(+ 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/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 (* 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/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/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 (+ 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/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 (* 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/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))))))))
(* (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)))))))))
(+ 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/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))))))))
(* (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 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ (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 (+ (* 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(- 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(/ (* 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)
(+ 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 (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/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/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/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 (+ 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/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 (* 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 (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 (+ 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 (* 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 (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 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (- 1 (+ (* 1/2 (cos (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)
(+ (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 (+ (* 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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (- 1 (+ (* 1/2 (cos (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 (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)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(/ (* l (- 1 (+ (* 1/2 (cos (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 (* 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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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
(+ 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 (/ (* (pow l 2) (+ 1/2 (* -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))))))))
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
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
(* (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))))))))
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
(+ 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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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))))))))))
(* (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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
1
(+ 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 (* -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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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))))))))))
(* (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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 64 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3) (pow Om 6))))) (* -1 (/ (* (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (- (* -1/2 (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))))) (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (* (pow Om 4) (pow (sqrt 2) 2))))) (* (pow Om 2) (pow (sqrt 2) 2))))))) (sqrt 2))))))))
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(/ (* 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)
1
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
1
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -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 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(/ (* 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)
1
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(/ (* 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)
(* 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))))
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))))))))))))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 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))))))
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 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(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))))))
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)))))))))
(* 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))))
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))))))))))))
(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))))))
(* 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))))
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))))))))))))
(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))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(/ (* 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)
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l)
1/2
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(/ (* 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)
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(/ (* 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)
(* 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))))
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)))
(* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2)))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 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 (/ (+ (* 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)))
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 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) 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) (* -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)))
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)))
(* 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))))
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)))
(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)))
(* 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))))
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)))
(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)))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(/ (* 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)
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l))
1/2
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)))
(+ 1/2 (* -1 (/ (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(/ (* 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)
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(/ (* 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)
Outputs
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ 1 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- (+ 1 (pow kx 2)) (* 1/2 (+ 1 (cos (* 2 ky)))))
(-.f64 (fma.f64 kx kx #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- (+ 1 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (+ 1 (cos (* 2 ky)))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- (+ 1 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (+ 1 (cos (* 2 ky)))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -4/3 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))) (* 4 (/ (pow l 2) (pow Om 2))))))
(fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* 4 (/ (pow l 2) (pow Om 2))) (* (pow kx 2) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 8/45 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 kx kx)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 kx kx) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 kx kx) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
(/ 1 (pow kx 2))
(/.f64 #s(literal 1 binary64) (*.f64 kx kx))
(/ (+ 1 (* 1/3 (pow kx 2))) (pow kx 2))
(/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(/ (+ 1 (* (pow kx 2) (+ 1/3 (* 1/15 (pow kx 2))))) (pow kx 2))
(/.f64 (fma.f64 (fma.f64 #s(literal 1/15 binary64) (*.f64 kx kx) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(/ (+ 1 (* (pow kx 2) (+ 1/3 (* (pow kx 2) (+ 1/15 (* 2/189 (pow kx 2))))))) (pow kx 2))
(/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/189 binary64) (*.f64 kx kx) #s(literal 1/15 binary64)) (*.f64 kx kx) #s(literal 1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin ky) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx 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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 4 binary64) (*.f64 #s(literal -4/3 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)))) (*.f64 kx kx) #s(literal 1 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 kx kx))) #s(literal -1/4 binary64) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))) (*.f64 kx kx) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 kx kx)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 kx kx) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 #s(literal 16/3 binary64) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))) (*.f64 kx kx) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 kx kx) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 kx kx) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 kx kx)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal 2/45 binary64))) (*.f64 kx kx) (/.f64 l Om)) (*.f64 kx kx)))
(+ 1 (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (+ (cos (* 2 ky)) (* -2 (pow kx 2))))
(+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) (fma.f64 #s(literal -2 binary64) (*.f64 kx kx) #s(literal 1 binary64)))
(+ 1 (+ (cos (* 2 ky)) (* (pow kx 2) (- (* 2/3 (pow kx 2)) 2))))
(+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 2/3 binary64) (*.f64 kx kx) #s(literal -2 binary64)) (*.f64 kx kx) #s(literal 1 binary64)))
(+ 1 (+ (cos (* 2 ky)) (* (pow kx 2) (- (* (pow kx 2) (+ 2/3 (* -4/45 (pow kx 2)))) 2))))
(+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) (fma.f64 (fma.f64 (fma.f64 #s(literal -4/45 binary64) (*.f64 kx kx) #s(literal 2/3 binary64)) (*.f64 kx kx) #s(literal -2 binary64)) (*.f64 kx kx) #s(literal 1 binary64)))
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om)) #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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 kx kx)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 kx kx) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 kx kx) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow kx 2) (pow l 2)) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 kx kx)) (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow kx 2) (+ (* -1 (/ (pow l 2) (pow Om 2))) (* -1/4 (* (pow kx 2) (+ (* -16 (/ (pow l 4) (pow Om 4))) (+ (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 kx kx)) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 l l)) (*.f64 Om Om)) #s(literal -4 binary64) (fma.f64 (/.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 16/3 binary64) (/.f64 (*.f64 #s(literal 8/45 binary64) (*.f64 l l)) (*.f64 Om Om))))) (*.f64 kx kx) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -16 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -4/3 binary64) (*.f64 l l)) (*.f64 Om Om)))))) (*.f64 kx kx) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om))) (*.f64 kx kx) #s(literal 1 binary64))
(/ 1 kx)
(/.f64 #s(literal 1 binary64) kx)
(/ (+ 1 (* 1/6 (pow kx 2))) kx)
(/.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 kx kx) #s(literal 1 binary64)) kx)
(/ (+ 1 (* (pow kx 2) (+ 1/6 (* 7/360 (pow kx 2))))) kx)
(/.f64 (fma.f64 (fma.f64 #s(literal 7/360 binary64) (*.f64 kx kx) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)
(/ (+ 1 (* (pow kx 2) (+ 1/6 (* (pow kx 2) (+ 7/360 (* 31/15120 (pow kx 2))))))) kx)
(/.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 31/15120 binary64) (*.f64 kx kx) #s(literal 7/360 binary64)) (*.f64 kx kx) #s(literal 1/6 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) kx)
(pow kx 2)
(*.f64 kx kx)
(* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))
(*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))
(*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(* (pow kx 2) (+ 1 (* (pow kx 2) (- (* (pow kx 2) (+ 2/45 (* -1/315 (pow kx 2)))) 1/3))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/315 binary64) (*.f64 kx kx) #s(literal 2/45 binary64)) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 kx kx) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 kx kx)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal 2/45 binary64))) (*.f64 kx kx) (/.f64 l Om)) (*.f64 kx kx)))
(- 1/2 (* 1/2 (cos (* 2 ky))))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (pow kx 2)) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 kx kx #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* -1/3 (pow kx 2))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow kx 2) (+ 1 (* (pow kx 2) (- (* 2/45 (pow kx 2)) 1/3))))) (* 1/2 (cos (* 2 ky))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* 2 (* (/ (* (pow kx 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 kx l) (*.f64 kx l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 1/2 (* (* (pow kx 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 kx kx)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))) (* (pow kx 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))) (* (pow kx 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow kx 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 ky))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 Om #s(literal 4 binary64)) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))))) (*.f64 kx kx))))) (*.f64 kx kx) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 kx kx) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 ky))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (/.f64 (*.f64 (*.f64 kx kx) l) 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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 kx kx)))
(+ (* (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 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 l Om) #s(literal -1/3 binary64) (*.f64 (/.f64 (*.f64 (*.f64 kx kx) l) Om) #s(literal 2/45 binary64))) (*.f64 kx kx) (/.f64 l Om)) (*.f64 kx kx)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(* 2 kx)
(*.f64 kx #s(literal 2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (neg (* -2 kx)))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 kx)))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(/ (+ (* 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.f64 Om Om))
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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(* 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(/ (+ (* 4 (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx)))))) (pow Om 2)) (pow Om 2))
(/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 Om Om))
(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 (sqrt.f64 #s(literal 1/2 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))))) (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 (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 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.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 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (*.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))))))) Om (sqrt.f64 #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 (*.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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) Om #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 (fma.f64 (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 (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 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) Om #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 kx)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))
(fma.f64 (fma.f64 (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/4 binary64))) Om #s(literal 1/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 (sqrt.f64 #s(literal 1/2 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))))) (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 (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 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.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 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/32 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) Om (*.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))))))) Om (sqrt.f64 #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 (*.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 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l 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 (sqrt.f64 (/.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/4 binary64))) Om #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 (fma.f64 (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 (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 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.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/4 binary64))) Om #s(literal 1/2 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(/ (+ (* 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.f64 Om Om))
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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 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 (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 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l))) #s(literal -1/32 binary64))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l))) #s(literal -1/32 binary64))) Om (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))) Om (sqrt.f64 #s(literal 1/2 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(/ (+ (* 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) (*.f64 Om Om))
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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))) Om #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 (fma.f64 (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 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64))) Om #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 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 (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 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l))) #s(literal -1/32 binary64))) Om (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 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) Om) (*.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -3/64 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l))) #s(literal -1/32 binary64))) Om (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))) Om (sqrt.f64 #s(literal 1/2 binary64)))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* Om (+ (* -1/16 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/2 binary64))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/256 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))
(*.f64 (fma.f64 (fma.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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/16 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/2 binary64))) Om)
(* Om (+ (* 1/2 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/16 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* (pow Om 2) (+ (* -5/2048 (* (/ (pow Om 2) (pow l 7)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 7))))) (* 3/256 (* (/ 1 (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5)))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 7 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (pow.f64 l #s(literal 5 binary64))) #s(literal 3/256 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/16 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/2 binary64))) Om)
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(+ 1/2 (* Om (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))) (* (pow Om 2) (+ (* -1/32 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 3/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 5))))))))))
(fma.f64 (fma.f64 (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 5 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)) #s(literal -1/32 binary64))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) l) #s(literal 1/4 binary64))) Om #s(literal 1/2 binary64))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(/ (+ (* 1/4 (* (/ (pow Om 2) l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) Om)
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 Om Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* -1/64 (* (/ (pow Om 2) (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 Om Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (+ (* 2 (* l (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* (pow Om 2) (+ (* 1/4 (* (/ 1 l) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* (pow Om 2) (+ (* -1/64 (* (/ 1 (pow l 3)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/512 (* (/ (pow Om 2) (pow l 5)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5)))))))))) Om)
(/.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 Om Om) (pow.f64 l #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (*.f64 #s(literal -1/64 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) l)))) (*.f64 Om Om) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) l) #s(literal 1/4 binary64))) (*.f64 Om Om) (*.f64 (*.f64 #s(literal 2 binary64) l) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))) Om)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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)))))
(fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)) (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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)))))
(fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)) (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* -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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
(+ (* -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)))))
(fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (fma.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2))) (* 4 (* (pow l 4) (pow (+ (pow (sin kx) 2) (pow (sin ky) 2)) 2)))) (pow Om 4)))))
(fma.f64 (/.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (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))) (* -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) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.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 l #s(literal 4 binary64))) #s(literal -12 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 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 (*.f64 (*.f64 (pow.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (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
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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)))))
(fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)) (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (+ (* -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)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(+ 1 (+ (* -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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 64 (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64)))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))))) #s(literal 1/2 binary64) (fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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) (* (+ (* -16 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2))) (* 4 (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)))) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 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)))))
(fma.f64 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)) (fma.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -2 binary64)))) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 Om #s(literal 6 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/2 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/2 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/2 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -1/4 binary64) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
(+ 1 (+ (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))) (+ (* -1/4 (/ (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2)))) (pow Om 4))) (* -1/4 (/ (+ (* 2 (* (pow l 2) (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))) (* 4 (* (pow l 4) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2))))))) (* 64 (* (pow l 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (pow Om 6))))))
(fma.f64 #s(literal -1/4 binary64) (+.f64 (/.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 l l)) (*.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 64 binary64) (pow.f64 l #s(literal 6 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (pow.f64 Om #s(literal 6 binary64))) (/.f64 (*.f64 (*.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 l #s(literal 4 binary64))) #s(literal -12 binary64)) (pow.f64 Om #s(literal 4 binary64)))) (fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -2 (/ (* (pow l 4) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (+ (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))) (* 4 (/ (* (pow l 6) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))
(+.f64 (fma.f64 (*.f64 (pow.f64 l #s(literal 6 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (fma.f64 (*.f64 (pow.f64 l #s(literal 4 binary64)) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64)))) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ 1 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- (+ 1 (pow ky 2)) (* 1/2 (+ 1 (cos (* 2 kx)))))
(-.f64 (fma.f64 ky ky #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- (+ 1 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (+ 1 (cos (* 2 kx)))))
(-.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(- (+ 1 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (+ 1 (cos (* 2 kx)))))
(-.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(* (sqrt 1/2) (sqrt (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2)))))))))
(*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (pow (sin kx) 2)) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky)) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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)))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om))) #s(literal -4/3 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 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)))))))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 ky ky) (/.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 ky ky) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (*.f64 Om Om))) (*.f64 ky ky) #s(literal 1 binary64)))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(+ (* -1 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* -1/4 (* (* (pow ky 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))
(fma.f64 (fma.f64 (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (*.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 ky ky))) #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(+ (* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* -1 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))) (* (pow ky 2) (+ (* -1/4 (* (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (* -1/4 (* (* (pow ky 2) (+ (* -4 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (+ (* 8/45 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (+ (* 2 (/ (* (pow l 2) (+ (* -16 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))) (+ (* -4/3 (/ (pow l 2) (* (pow Om 2) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 2)))) (* 4 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))) (* 16/3 (/ (pow l 4) (* (pow Om 4) (pow (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))) 3)))))))) (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))) (+.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))) (/.f64 (neg.f64 (*.f64 l l)) (*.f64 Om Om)))) (*.f64 ky ky) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (neg.f64 (*.f64 (*.f64 ky ky) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (fma.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 ky ky) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64)))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal 2 binary64) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 16/3 binary64) (*.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal 8/45 binary64))))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -16 binary64) (fma.f64 (/.f64 (*.f64 l l) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 Om Om))) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal 4 binary64))))) (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)))))))))) (*.f64 ky ky) (*.f64 (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) #s(literal 3 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))))))) (*.f64 ky ky) (*.f64 (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)
(*.f64 l (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (/.f64 (*.f64 (*.f64 ky ky) l) 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))
(+ (* (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal 2/45 binary64) (*.f64 (/.f64 l Om) #s(literal -1/3 binary64))) (*.f64 ky ky) (/.f64 l Om)) (*.f64 ky ky)))
(+ 1 (cos (* 2 kx)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (+ (cos (* 2 kx)) (* -2 (pow ky 2))))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (fma.f64 (*.f64 ky ky) #s(literal -2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (cos (* 2 kx)) (* (pow ky 2) (- (* 2/3 (pow ky 2)) 2))))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/3 binary64) #s(literal -2 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
(+ 1 (+ (cos (* 2 kx)) (* (pow ky 2) (- (* (pow ky 2) (+ 2/3 (* -4/45 (pow ky 2)))) 2))))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -4/45 binary64) #s(literal 2/3 binary64)) (*.f64 ky ky) #s(literal -2 binary64)) (*.f64 ky ky) #s(literal 1 binary64)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)
(*.f64 l (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (/.f64 (*.f64 (*.f64 ky ky) l) 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))
(+ (* (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal 2/45 binary64) (*.f64 (/.f64 l Om) #s(literal -1/3 binary64))) (*.f64 ky ky) (/.f64 l Om)) (*.f64 ky ky)))
(- 1/2 (* 1/2 (cos (* 2 kx))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(- (+ 1/2 (pow ky 2)) (* 1/2 (cos (* 2 kx))))
(fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* -1/3 (pow ky 2))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(- (+ 1/2 (* (pow ky 2) (+ 1 (* (pow ky 2) (- (* 2/45 (pow ky 2)) 1/3))))) (* 1/2 (cos (* 2 kx))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal 2/45 binary64) #s(literal -1/3 binary64)) (*.f64 ky ky) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* 2 (* (/ (* (pow ky 2) (pow l 2)) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 ky ky) (/.f64 (*.f64 l l) (*.f64 Om Om)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 1/2 (* (* (pow ky 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 ky ky)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(+ (sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))) (* (pow ky 2) (+ (* 2 (* (/ (pow l 2) (pow Om 2)) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))) (* (pow ky 2) (+ (* 1/2 (* (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))) (* 1/2 (* (* (pow ky 2) (- (* 8/45 (/ (pow l 2) (pow Om 2))) (* 2 (/ (* (pow l 2) (- (* -4/3 (/ (pow l 2) (pow Om 2))) (* 4 (/ (pow l 4) (* (pow Om 4) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (* (pow Om 2) (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2))))))))) (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1/2 (* 1/2 (cos (* 2 kx))))) (pow Om 2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) (+.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 #s(literal 8/45 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om)) (*.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (/.f64 (*.f64 l l) (*.f64 Om Om)) #s(literal -4/3 binary64) (*.f64 (/.f64 (pow.f64 l #s(literal 4 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -4 binary64))) (*.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)) (*.f64 Om Om)))) #s(literal -2 binary64))) (*.f64 ky ky))))) (*.f64 ky ky) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 l l) (*.f64 Om Om))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))))) (*.f64 ky ky) (sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))
(/ (* l (- 1/2 (* 1/2 (cos (* 2 kx))))) Om)
(*.f64 l (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (/.f64 (*.f64 (*.f64 ky ky) l) 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.f64 ky ky)))
(+ (* (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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) Om) (*.f64 (fma.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal 2/45 binary64) (*.f64 (/.f64 l Om) #s(literal -1/3 binary64))) (*.f64 ky ky) (/.f64 l Om)) (*.f64 ky ky)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (* 1/2 (+ (cos (* 2 kx)) (cos (* 2 ky)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)) (*.f64 Om Om)) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(* 1/2 (+ 1 (sqrt (/ 1 (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 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 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(+ (cos (* 2 kx)) (cos (* 2 ky)))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(sqrt (+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) (pow Om 2)))))
(sqrt.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (neg (* -2 ky)))) (* 1/2 (cos (* 2 kx)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (- 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (* (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 (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)) (/.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 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)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (+.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))) (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))
(+ (* (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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.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)) #s(literal -1/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)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #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 (* (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 (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)) (/.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)))) (*.f64 l l) #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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.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))) #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 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 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 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)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (- 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
(+ 1 (* 4 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (neg.f64 (*.f64 l l)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (- 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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(* (sqrt 1/2) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (neg.f64 (*.f64 l l)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (fma.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 l l)) (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/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 (/ (* (+ (* -16 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (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/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (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 (fma.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 (*.f64 l l) (/.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (*.f64 (*.f64 Om Om) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) #s(literal -1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (neg.f64 (*.f64 (pow.f64 Om #s(literal 4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 l l) (*.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 Om Om))))) (*.f64 l l) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om))) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/2 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/2 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/2 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal -2 binary64))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ (* (pow l 2) (+ 1/2 (* -1/2 (cos (* 2 kx))))) (pow Om 2))))
(fma.f64 (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om))) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* -1/4 (* (pow l 2) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 l l)) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -1 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (* (pow l 2) (+ (* -1/4 (* (pow l 2) (+ (* 2 (/ (* (+ 1/2 (* -1/2 (cos (* 2 kx)))) (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))) (pow Om 2))) (* 64 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3) (pow Om 6)))))) (* -1/4 (+ (* -16 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))) (* 4 (/ (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 2) (pow Om 4))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) (fma.f64 (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (/.f64 (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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))) #s(literal 2 binary64) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64))) #s(literal 64 binary64))) (*.f64 l l) (*.f64 (/.f64 (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -12 binary64)))) (*.f64 l l) (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 Om Om)))) (*.f64 l l) #s(literal 1 binary64))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
1
#s(literal 1 binary64)
(+ 1 (* 2 (/ (* (pow l 2) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) (pow Om 2))))
(fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* -2 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2)) (pow Om 4))) (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64)))) #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(+ 1 (* (pow l 2) (+ (* 2 (/ (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) (pow Om 2))) (* (pow l 2) (+ (* -2 (/ (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 2) (pow Om 4))) (* 4 (/ (* (pow l 2) (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3)) (pow Om 6))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 l l) (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 Om #s(literal 6 binary64)))) #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (pow.f64 Om #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 l l) (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 2 binary64))) (*.f64 l l) #s(literal 1 binary64))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(* (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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))))
(* 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (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))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 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)))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #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 (*.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))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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/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 (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.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 (pow.f64 l #s(literal 5 binary64)) Om))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/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 (sqrt.f64 #s(literal 1/2 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))))) (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))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 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)))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #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 (*.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))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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/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 (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (/.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 (pow.f64 l #s(literal 5 binary64)) Om))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l 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)))) (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))))
(* 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(* (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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 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)))))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)))) #s(literal -1/32 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))))))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64)) (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #s(literal 1/2 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(* (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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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)))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 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))))))))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 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)))))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)))) #s(literal -1/32 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))))))))) (* 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 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64)) (*.f64 (*.f64 l l) l))) #s(literal 1/2 binary64) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 Om Om) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 l l)))) #s(literal -1/32 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))) l)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(* 1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)
(/.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) l)
(/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l)
(/.f64 (fma.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) l)
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))
(fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(+ 1/2 (+ (* -1/2 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 5))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 3)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))))
(fma.f64 (*.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 5 binary64)) Om))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 (*.f64 l l) l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))) l)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(* 2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))
(*.f64 (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))) l)
(* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))) l)
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(* (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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 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 (+ (* 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))) l))
(* 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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 Om Om))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #s(literal 1 binary64))
(* (pow l 2) (+ (* 4 (/ (+ 1/2 (* -1/2 (cos (* 2 kx)))) (pow Om 2))) (/ 1 (pow l 2))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) l)) #s(literal 1/32 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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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)) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 Om Om) (/.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))))) #s(literal -1/32 binary64))) (neg.f64 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 (*.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 (*.f64 Om 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 (*.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 (pow.f64 l #s(literal 4 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om 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 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) 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 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (+ (pow (sin kx) 2) (pow (sin ky) 2))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om)) (*.f64 (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))) l)) #s(literal 1/32 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 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.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))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om 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)) #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 Om Om) (/.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))))) #s(literal -1/32 binary64))) (neg.f64 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 (*.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 (*.f64 Om 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 (*.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 (pow.f64 l #s(literal 4 binary64)) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om 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))
(* 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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(* (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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 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 (+ (* 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))) 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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) l))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64)) l)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (neg.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)) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) (*.f64 Om Om))
(* (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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 Om Om)) #s(literal 4 binary64)) (*.f64 l l) #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) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal 1/2 binary64))
(+ 1/2 (* -1 (/ (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 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 (+ (* 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 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))) 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 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (sqrt 1/2) (* -1 (/ (+ (* 1/32 (/ (* (pow Om 2) (sqrt 1/2)) (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) l))) l))
(+ (sqrt 1/2) (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (sqrt 1/2) (- (* -1/16 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (* -1/64 (* (pow Om 3) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))))) l)) (* -1/32 (/ (* (pow Om 2) (sqrt 1/2)) (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))) l)) (* 1/4 (* (* Om (sqrt 1/2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))) l)))
(-.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 Om Om) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64))))) #s(literal -3/64 binary64)) l)) #s(literal -1/2 binary64) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 Om Om))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))) (neg.f64 l))) l))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 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 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(* -1/2 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(* -1 (/ (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l))
(/.f64 (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l))
(/.f64 (fma.f64 (neg.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (neg.f64 l))
(* -1 (/ (+ (* -1 (* (/ (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1 (* (/ (+ (* 1/256 (/ (pow Om 8) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 4))) (* 1/8 (/ (* (pow Om 2) (+ (* -1/64 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (* Om (pow l 6))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/16 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/2 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))))) l))
(/.f64 (fma.f64 (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (+.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om))) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 Om Om) (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/8 binary64) (/.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 Om #s(literal 8 binary64))) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 4 binary64)))) (*.f64 (pow.f64 l #s(literal 6 binary64)) Om)))) (fma.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) Om) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) (neg.f64 l))
1/2
#s(literal 1/2 binary64)
(+ 1/2 (* -1/4 (* (/ Om l) (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))
(fma.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 kx)))) 3))) (* 1/256 (/ (pow Om 6) (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3)))) (* Om (pow l 4))) (sqrt (+ 1/2 (* -1/2 (cos (* 2 kx))))))) (+ (* -1/32 (* (/ (pow Om 3) (pow l 2)) (sqrt (/ 1 (pow (+ 1/2 (* -1/2 (cos (* 2 kx)))) 3))))) (* 1/4 (* Om (sqrt (/ 1 (+ 1/2 (* -1/2 (cos (* 2 kx)))))))))) l)))
(-.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 (*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 Om #s(literal 6 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) #s(literal -3/256 binary64)) (*.f64 (pow.f64 l #s(literal 4 binary64)) Om)) (sqrt.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64) (fma.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))) l))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 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 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(* -2 (* (/ l Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))
(*.f64 (*.f64 #s(literal -2 binary64) (/.f64 l Om)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))
(* -1 (* l (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))
(*.f64 (neg.f64 l) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))))))))
(* -1 (* l (+ (* -1/64 (* (/ (pow Om 3) (pow l 4)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 3))))) (+ (* 1/512 (* (/ (pow Om 5) (pow l 6)) (sqrt (/ 1 (pow (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))) 5))))) (+ (* 1/4 (* (/ Om (pow l 2)) (sqrt (/ 1 (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky))))))))) (* 2 (* (/ 1 Om) (sqrt (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))))))))))
(*.f64 (neg.f64 l) (fma.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (*.f64 Om Om) Om) (pow.f64 l #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/512 binary64) (/.f64 (pow.f64 Om #s(literal 5 binary64)) (pow.f64 l #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) #s(literal 5 binary64)))) (fma.f64 (/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64)))) Om) #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om (*.f64 l l))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 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 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))
(/ (* l (- 1 (+ (* 1/2 (cos (* 2 kx))) (* 1/2 (cos (* 2 ky)))))) Om)
(*.f64 l (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))) #s(literal 1/2 binary64))) Om))

rewrite211.0ms (1.5%)

Memory
-4.7MiB live, 302.3MiB allocated
Rules
3 640×lower-*.f32
3 610×lower-*.f64
3 460×lower-fma.f32
3 440×lower-fma.f64
2 254×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01031119
01611094
1725858
25926845
08058819
Stop Event
iter limit
node limit
iter limit
Counts
31 → 511
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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64))))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))
(*.f64 kx #s(literal 2 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))))))
(+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64))))
#s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))))
#s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) #s(literal 1 binary64))
(-.f64 (/.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #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 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (/.f64 #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 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(pow.f64 (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)))))
(fma.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))) #s(literal 1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))) #s(literal 1 binary64))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 2 binary64)) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
(-.f64 (/.f64 #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 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)) #s(literal 1 binary64))))
(-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))))
(+.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))))
(*.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 ky ky #s(literal 0 binary64))))
(*.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 kx kx #s(literal 0 binary64))))
(*.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))
(*.f64 #s(literal 2 binary64) (-.f64 kx ky))
(*.f64 #s(literal 2 binary64) (+.f64 kx ky))
(*.f64 #s(literal 2 binary64) kx)
(*.f64 #s(literal 2 binary64) ky)
(*.f64 kx #s(literal 2 binary64))
(*.f64 ky #s(literal 2 binary64))
(pow.f64 (/.f64 (fma.f64 ky ky #s(literal 0 binary64)) (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 kx kx #s(literal 0 binary64)) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx))) #s(literal -1 binary64))
(pow.f64 (+.f64 kx kx) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 kx kx) (+.f64 kx kx)) (*.f64 (+.f64 kx kx) (+.f64 kx kx))) (+.f64 kx kx))
(/.f64 (-.f64 (pow.f64 (+.f64 kx kx) #s(literal 3 binary64)) (pow.f64 (+.f64 kx kx) #s(literal 3 binary64))) (fma.f64 (+.f64 kx kx) (+.f64 kx kx) (fma.f64 (+.f64 kx kx) (+.f64 kx kx) (*.f64 (+.f64 kx kx) (+.f64 kx kx)))))
(/.f64 (+.f64 (pow.f64 (+.f64 kx kx) #s(literal 3 binary64)) (pow.f64 (+.f64 kx kx) #s(literal 3 binary64))) (fma.f64 (+.f64 kx kx) (+.f64 kx kx) (-.f64 (*.f64 (+.f64 kx kx) (+.f64 kx kx)) (*.f64 (+.f64 kx kx) (+.f64 kx kx)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx))) (neg.f64 (fma.f64 ky ky #s(literal 0 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx))) (neg.f64 (fma.f64 kx kx #s(literal 0 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (fma.f64 ky ky #s(literal 0 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)))) (*.f64 #s(literal 0 binary64) (fma.f64 ky ky #s(literal 0 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) #s(literal 0 binary64)) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) #s(literal 0 binary64))) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (fma.f64 ky ky #s(literal 0 binary64))) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)))) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (fma.f64 ky ky #s(literal 0 binary64))))
(/.f64 (fma.f64 #s(literal 0 binary64) (fma.f64 ky ky #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)))) (*.f64 #s(literal 0 binary64) (fma.f64 ky ky #s(literal 0 binary64))))
(/.f64 (fma.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) #s(literal 0 binary64) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) #s(literal 0 binary64))) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) #s(literal 0 binary64)))
(/.f64 (fma.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (fma.f64 ky ky #s(literal 0 binary64)) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)))) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (fma.f64 ky ky #s(literal 0 binary64))))
(/.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)) (fma.f64 ky ky #s(literal 0 binary64)))
(/.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (fma.f64 kx kx #s(literal 0 binary64)))
(/.f64 #s(literal 0 binary64) #s(literal 0 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 ky ky #s(literal 0 binary64)) (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 kx kx #s(literal 0 binary64)) (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx))))
(/.f64 #s(literal 1 binary64) (+.f64 kx kx))
(fma.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 ky ky #s(literal 0 binary64))) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 ky ky #s(literal 0 binary64))) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 ky ky #s(literal 0 binary64))) (neg.f64 (+.f64 kx kx)))
(fma.f64 (*.f64 (fma.f64 ky ky #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 ky ky #s(literal 0 binary64))) (+.f64 kx kx))
(fma.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 kx kx #s(literal 0 binary64))) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 kx kx #s(literal 0 binary64))) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 kx kx #s(literal 0 binary64))) (neg.f64 (+.f64 kx kx)))
(fma.f64 (*.f64 (fma.f64 kx kx #s(literal 0 binary64)) (+.f64 kx kx)) (/.f64 #s(literal 1 binary64) (fma.f64 kx kx #s(literal 0 binary64))) (+.f64 kx kx))
(fma.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (neg.f64 (+.f64 kx kx)))
(fma.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)) (+.f64 kx kx))
(fma.f64 #s(literal 2 binary64) (-.f64 kx ky) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 #s(literal 2 binary64) (-.f64 kx ky) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (-.f64 kx ky) (neg.f64 (+.f64 kx kx)))
(fma.f64 #s(literal 2 binary64) (-.f64 kx ky) (+.f64 kx kx))
(fma.f64 #s(literal 2 binary64) (+.f64 kx ky) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 #s(literal 2 binary64) (+.f64 kx ky) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (+.f64 kx ky) (neg.f64 (+.f64 kx kx)))
(fma.f64 #s(literal 2 binary64) (+.f64 kx ky) (+.f64 kx kx))
(fma.f64 #s(literal 2 binary64) kx (*.f64 #s(literal -2 binary64) ky))
(fma.f64 #s(literal 2 binary64) kx (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) kx (neg.f64 (+.f64 kx kx)))
(fma.f64 #s(literal 2 binary64) kx (+.f64 kx kx))
(fma.f64 #s(literal 2 binary64) ky (*.f64 #s(literal -2 binary64) ky))
(fma.f64 #s(literal 2 binary64) ky (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) ky (neg.f64 (+.f64 kx kx)))
(fma.f64 #s(literal 2 binary64) ky (+.f64 kx kx))
(fma.f64 kx #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 kx #s(literal 2 binary64) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 kx #s(literal 2 binary64) (neg.f64 (+.f64 kx kx)))
(fma.f64 kx #s(literal 2 binary64) (+.f64 kx kx))
(fma.f64 ky #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) ky))
(fma.f64 ky #s(literal 2 binary64) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(fma.f64 ky #s(literal 2 binary64) (neg.f64 (+.f64 kx kx)))
(fma.f64 ky #s(literal 2 binary64) (+.f64 kx kx))
(-.f64 (-.f64 (+.f64 kx kx) ky) ky)
(-.f64 (/.f64 (*.f64 ky ky) #s(literal 0 binary64)) (/.f64 (*.f64 ky ky) #s(literal 0 binary64)))
(-.f64 (/.f64 (*.f64 kx kx) #s(literal 0 binary64)) (/.f64 (*.f64 kx kx) #s(literal 0 binary64)))
(-.f64 (+.f64 kx kx) (+.f64 kx kx))
(+.f64 (fma.f64 #s(literal 2 binary64) kx ky) ky)
(+.f64 (+.f64 kx kx) (*.f64 #s(literal -2 binary64) ky))
(+.f64 (+.f64 kx kx) (*.f64 (neg.f64 ky) #s(literal 2 binary64)))
(+.f64 (+.f64 kx kx) (neg.f64 (+.f64 kx kx)))
(+.f64 (+.f64 kx kx) (+.f64 kx kx))
(+.f64 kx (-.f64 kx (+.f64 kx kx)))
(+.f64 kx (+.f64 kx (+.f64 kx kx)))
(+.f64 kx kx)
(+.f64 ky ky)
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64))))
(*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)))))
(*.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) #s(literal 1 binary64))) (neg.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) #s(literal 1 binary64)) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64)))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)))))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))))
(/.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om))))
(/.f64 (neg.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om))) (fma.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) l #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) l) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) l) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))
(fma.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) l) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) l) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (/.f64 l Om) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) l)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) l)) #s(literal 1 binary64))
(fma.f64 l (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om)) #s(literal 1 binary64))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (*.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) (*.f64 Om Om)) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal -1 binary64))))
(+.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))
(*.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 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/4 binary64)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(pow.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/8 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))))) (-.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64))) (neg.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/4 binary64)))))
(/.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/4 binary64))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/8 binary64))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 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 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))))) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sin.f64 kx)) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(pow.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal -2 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 kx) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal -1 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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 binary64) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 binary64) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 binary64) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 binary64) #s(literal 1/2 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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 binary64) #s(literal 1/2 binary64))))
(*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (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 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(+.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64)) (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))))
(fma.f64 (*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (/.f64 l Om)) #s(literal 4 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 l Om) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64))
(fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 l Om) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 l Om))) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) #s(literal 1 binary64))
(fma.f64 (/.f64 l Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) #s(literal 1 binary64))
(fma.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (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 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(+.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal -3/2 binary64)) #s(literal 1 binary64))) (fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64)) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))))
(*.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 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 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) l) (/.f64 #s(literal 1 binary64) Om))
(*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 l Om))
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))))
(*.f64 l (/.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))))
(pow.f64 (/.f64 Om (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) l)) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 l) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 1 binary64) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))) (/.f64 Om l))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (neg.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) l) Om)
(/.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) (/.f64 Om l))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 1 binary64))) l)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))
(*.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #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 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))))
(*.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #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 -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (fma.f64 (+.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64))))))) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #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 (cos.f64 (+.f64 kx kx)) #s(literal 1 binary64)) #s(literal 1/2 binary64) (-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))) (+.f64 (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))))
(fma.f64 (+.f64 (cos.f64 ky) (sin.f64 kx)) (-.f64 (cos.f64 ky) (sin.f64 kx)) (cos.f64 (+.f64 kx kx)))
(fma.f64 (+.f64 (cos.f64 kx) (sin.f64 kx)) (-.f64 (cos.f64 kx) (sin.f64 kx)) (cos.f64 (+.f64 kx kx)))
(-.f64 (+.f64 (cos.f64 (+.f64 kx kx)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))) (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 kx kx) #s(literal 1/2 binary64)))))))))
(-.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (cos.f64 (+.f64 kx kx))))
(+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx)))
#s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx))
(*.f64 (pow.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal -1/4 binary64)) (pow.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal -1/4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))))
(pow.f64 (/.f64 (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)) #s(literal -1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (neg.f64 (log1p.f64 (*.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)))) #s(literal 1/2 binary64)))
#s(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (/.f64 (*.f64 Om #s(literal 1 binary64)) (*.f64 l (sin.f64 kx))) #s(literal 1/4 binary64) #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 -1/4 binary64)) (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal -1/4 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sin.f64 kx)))
(pow.f64 (/.f64 (sin.f64 kx) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #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 -1/2 binary64))
(pow.f64 (sin.f64 kx) #s(literal -1 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sin.f64 kx)))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 kx) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sin.f64 kx))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (log.f64 (sin.f64 kx))) (exp.f64 (log.f64 (sin.f64 kx))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal -1/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 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 (sin.f64 kx) (sin.f64 kx))
(pow.f64 (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (exp.f64 (log.f64 (sin.f64 kx))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 kx ky)) (cos.f64 (+.f64 kx ky))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64))))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (+.f64 kx kx))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #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 (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 binary64)) (*.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64))))
(/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 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) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))) (*.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal -1/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 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (+.f64 kx kx)) #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 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 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 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64) (-.f64 #s(literal 1/4 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #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 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #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))) (/.f64 #s(literal 1/4 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) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (+.f64 kx kx)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (sin.f64 kx)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 kx)) #s(literal 2 binary64)))
(+.f64 (*.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) (cos.f64 (+.f64 kx kx))))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om))
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 l (/.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 Om (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l)) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 l) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 1 binary64) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 Om l))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (neg.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l) Om)
(/.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 Om l))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l)))
#s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)) #s(literal 1 binary64))) (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 3 binary64)) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) (pow.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) 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 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))))
(sqrt.f64 (fma.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log1p.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) l) l) (*.f64 Om Om)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (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 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 l Om))
(*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))
(*.f64 l (/.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) Om))
(*.f64 l (*.f64 (/.f64 #s(literal 1 binary64) Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))))
(pow.f64 (/.f64 Om (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l)) #s(literal -1 binary64))
(/.f64 (*.f64 (neg.f64 l) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (neg.f64 Om))
(/.f64 (*.f64 #s(literal 1 binary64) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64))))) (/.f64 Om l))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (neg.f64 l)) (neg.f64 Om))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (/.f64 Om l))
(/.f64 (neg.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l)) (neg.f64 Om))
(/.f64 (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l) Om)
(/.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) (/.f64 Om l))
(/.f64 #s(literal 1 binary64) (/.f64 Om (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))) l)))

eval326.0ms (2.3%)

Memory
39.9MiB live, 614.6MiB allocated
Compiler

Compiled 97 548 to 7 711 computations (92.1% saved)

prune335.0ms (2.4%)

Memory
-22.0MiB live, 546.3MiB allocated
Pruning

20 alts after pruning (17 fresh and 3 done)

PrunedKeptTotal
New2 06782 075
Fresh1910
Picked505
Done033
Total2 073202 093
Accuracy
100.0%
Counts
2 093 → 20
Alt Table
Click to see full alt table
StatusAccuracyProgram
80.9%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
67.6%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #s(literal 1 binary64)))))))
83.9%
(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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #s(literal 1 binary64)))))))
88.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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))))) #s(literal 1 binary64)))))))
31.6%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #s(literal 1 binary64)))))))
76.0%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #s(literal 1 binary64)))))))
68.9%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))))))) #s(literal 1 binary64)))))))
89.1%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
87.3%
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
73.6%
(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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64))))))))
39.5%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
60.1%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #s(literal 1 binary64)))
66.2%
(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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))))
26.3%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))))
71.7%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
16.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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))))
23.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(approx (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))) #s(literal 1/2 binary64)))))
49.0%
(sqrt.f64 #s(approx (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #s(literal 1/2 binary64)))))
57.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(literal 1/2 binary64)))
39.0%
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
Compiler

Compiled 1 977 to 719 computations (63.6% saved)

regimes271.0ms (1.9%)

Memory
9.5MiB live, 477.2MiB allocated
Counts
46 → 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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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)) #s(approx (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (fma.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
(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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #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 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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 #s(approx (* (/ 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:

27.0ms
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
18.0ms
l
16.0ms
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
16.0ms
(*.f64 #s(literal 2 binary64) l)
15.0ms
(sin.f64 kx)
Results
AccuracySegmentsBranch
97.6%1l
97.6%1Om
97.6%1kx
97.6%1ky
99.7%2(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
99.7%2(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
99.7%2(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
99.7%2(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
99.7%2(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
99.7%2(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
99.7%2(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
99.7%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
99.7%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
97.6%1(*.f64 #s(literal 2 binary64) l)
97.6%1(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
97.6%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
97.6%1(sin.f64 kx)
97.6%1(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
97.6%1(sin.f64 ky)
Compiler

Compiled 275 to 198 computations (28% saved)

regimes121.0ms (0.9%)

Memory
20.9MiB live, 243.0MiB allocated
Counts
45 → 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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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)) #s(approx (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (fma.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
(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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 ky ky))))))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) #s(approx (pow (sin ky) 2) (*.f64 (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 ky ky) #s(literal 1 binary64)) ky) ky))))))))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 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))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 kx kx)))))) (/.f64 (*.f64 (*.f64 l l) #s(literal 4 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
Outputs
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))))
Calls

9 calls:

17.0ms
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
16.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))))))))))
13.0ms
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
12.0ms
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
12.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.9%2(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
97.9%2(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
97.9%2(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
97.9%2(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
99.4%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.4%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.4%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))))
98.6%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
98.6%2(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
Compiler

Compiled 207 to 142 computations (31.4% saved)

regimes40.0ms (0.3%)

Memory
-7.2MiB live, 74.8MiB allocated
Counts
40 → 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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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)) #s(approx (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (fma.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
(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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))))))
Outputs
(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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(literal 1/2 binary64)))
Calls

3 calls:

10.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)))))
10.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))))
10.0ms
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
Results
AccuracySegmentsBranch
99.3%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.3%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.3%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 68 to 47 computations (30.9% saved)

regimes32.0ms (0.2%)

Memory
22.9MiB live, 61.8MiB allocated
Counts
39 → 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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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)) #s(approx (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (fma.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) #s(literal 1 binary64)))))))
(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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 #s(literal 1/2 binary64) (-.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 kx kx))))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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(literal 1/2 binary64)))
Calls

3 calls:

10.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)))))
10.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))))
9.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
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 68 to 47 computations (30.9% saved)

regimes170.0ms (1.2%)

Memory
-8.4MiB live, 331.9MiB allocated
Counts
35 → 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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #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)))))))) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #s(literal 1 binary64))) #s(literal -1/4 binary64)) (-.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (+.f64 kx kx)) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1/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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/2 binary64) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 binary64) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(approx (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1) (fma.f64 (*.f64 (*.f64 l l) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64))) (*.f64 Om Om))) #s(literal 4 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) (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) (fma.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal -1/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 2 binary64)) (*.f64 (*.f64 (/.f64 l Om) #s(literal 2 binary64)) (+.f64 #s(approx (pow (sin ky) 2) (*.f64 ky ky)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 #s(literal -1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 ky ky))) #s(approx (- 1/2 (* 1/2 (cos (+ kx kx)))) (*.f64 (fma.f64 (fma.f64 #s(literal 2/45 binary64) (*.f64 kx kx) #s(literal -1/3 binary64)) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx kx)))))) #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)) #s(approx (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))))) (fma.f64 l (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) #s(literal 1/2 binary64))) Om) (*.f64 (fma.f64 (/.f64 (*.f64 (*.f64 ky ky) l) Om) #s(literal -1/3 binary64) (/.f64 l Om)) (*.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)))))))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (*.f64 Om Om)) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 (/.f64 #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)))))))) #s(literal 1/2 binary64))))
#s(approx (sqrt (* (/ 1 2) (+ 1 (/ 1 (sqrt (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1)))))) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) Om) l)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 kx #s(literal 2 binary64))) (cos.f64 (*.f64 ky #s(literal 2 binary64)))))))) (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (-.f64 #s(literal 1/2 binary64) (-.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 kx kx)))))) (/.f64 (*.f64 (*.f64 l 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 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) (*.f64 (/.f64 l Om) #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (+.f64 kx kx))))))) #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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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(literal 1/2 binary64)))
Calls

15 calls:

27.0ms
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
11.0ms
Om
11.0ms
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
11.0ms
ky
10.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
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)
93.0%3l
94.4%3Om
88.4%1kx
97.1%2ky
93.0%3(*.f64 #s(literal 2 binary64) l)
97.1%2(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
88.4%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
88.4%1(sin.f64 kx)
97.1%2(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
97.1%3(sin.f64 ky)
98.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))))))
98.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)))))
98.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 156 to 118 computations (24.4% saved)

regimes17.0ms (0.1%)

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

3 calls:

6.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))))
5.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)))))
5.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
98.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))))))
98.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)))))
98.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 68 to 47 computations (30.9% saved)

regimes36.0ms (0.3%)

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

7 calls:

6.0ms
(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
6.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))))
5.0ms
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
4.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)))))
4.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
96.6%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))))))))))
96.6%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)))))))))
96.6%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))))))))
96.6%2(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
97.6%2(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
97.6%2(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
97.6%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 187 to 127 computations (32.1% saved)

regimes22.0ms (0.2%)

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

5 calls:

5.0ms
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
4.0ms
(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
4.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))))
4.0ms
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
4.0ms
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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
96.4%2(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
98.2%3(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
97.6%2(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
97.6%2(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
97.6%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)

regimes9.0ms (0.1%)

Memory
23.3MiB live, 23.3MiB allocated
Counts
8 → 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 (+ (* (* (/ l Om) 4) (* (/ l Om) (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))))) 1))))) #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 (+ (* (sqrt (/ 1 (+ (* (* (* 4 (/ l Om)) l) (/ (+ (* -1/2 (cos (+ kx kx))) 1/2) Om)) 1))) 1/2) 1/2) (fma.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 Om l)) (sqrt.f64 #s(approx (/ 1 (+ (* (cos (* kx 2)) -1/2) 1/2)) (/.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 kx kx) #s(literal 1 binary64)) (*.f64 kx 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)))))))) (+.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 #s(approx (+ (* -1/2 (cos (+ kx kx))) 1/2) (*.f64 kx kx)) Om) #s(literal 1 binary64)))) #s(literal 1/2 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 ky ky #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (fma.f64 (fma.f64 (*.f64 ky ky) #s(literal -1/3 binary64) #s(literal 1 binary64)) (*.f64 ky ky) #s(approx (+ (* (cos (* kx 2)) -1/2) 1/2) (*.f64 kx kx))))) #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

3 calls:

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
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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
(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) 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.4%2(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
97.4%2(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
97.4%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 68 to 47 computations (30.9% saved)

regimes71.0ms (0.5%)

Memory
-11.0MiB live, 67.7MiB 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:

46.0ms
(sin.f64 ky)
2.0ms
(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
1.0ms
(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
1.0ms
Om
1.0ms
(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
Results
AccuracySegmentsBranch
57.6%1(sin.f64 kx)
57.6%1kx
57.6%1(pow.f64 (sin.f64 kx) #s(literal 2 binary64))
57.6%1l
57.6%1(*.f64 #s(literal 2 binary64) l)
57.6%1Om
57.6%1(sin.f64 ky)
57.6%1(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64))
57.6%1(sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))))
57.6%1(*.f64 (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))))
57.6%1(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))))
57.6%1(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))))
57.6%1(/.f64 (*.f64 #s(literal 2 binary64) l) Om)
57.6%1(+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))
57.6%1ky
57.6%1(pow.f64 (sin.f64 ky) #s(literal 2 binary64))
57.6%1(sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))))
57.6%1(+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64)))))
57.6%1(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 2 binary64)) (+.f64 (pow.f64 (sin.f64 kx) #s(literal 2 binary64)) (pow.f64 (sin.f64 ky) #s(literal 2 binary64))))
Compiler

Compiled 275 to 198 computations (28% saved)

bsearch1.0ms (0%)

Memory
1.0MiB live, 1.0MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.032791884629651e+109
7.339353300886617e+109
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
144.17947981787003
437625.57604557194
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.7MiB live, 0.7MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.6109175777071407e+24
1.0662197357898607e+40
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.6109175777071407e+24
1.0662197357898607e+40
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.6109175777071407e+24
1.0662197357898607e+40
Compiler

Compiled 36 to 30 computations (16.7% saved)

bsearch0.0ms (0%)

Memory
0.6MiB live, 0.6MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
4.6109175777071407e+24
1.0662197357898607e+40
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
144.17947981787003
437625.57604557194
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
3.5466408552099185
5.507163132054108
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
3.5466408552099185
5.507163132054108
Compiler

Compiled 36 to 30 computations (16.7% saved)

simplify33.0ms (0.2%)

Memory
-17.9MiB live, 22.6MiB allocated
Algorithm
egg-herbie
Rules
294×unsub-neg_binary64
146×neg-mul-1_binary64
128×distribute-lft-neg-in_binary64
72×*-commutative_binary64
66×distribute-neg-out_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0156891
1206891
2239891
3287891
4345891
5384891
6436891
7588891
8755891
9759891
10766891
11773891
12780891
13784891
14785891
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 19999999999999999637017414376799615729435301928656342495916796739798145108760106596411606848786275352526716928 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 #s(approx (* (/ 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 200 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
(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 5000000000000000452984832 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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(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 5000000000000000452984832 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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(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 5000000000000000452984832 binary64)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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(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 5000000000000000452984832 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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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(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 200 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #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 5 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(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #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 5 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
(if (<=.f64 (/.f64 (*.f64 #s(literal 2 binary64) l) Om) #s(literal 19999999999999999637017414376799615729435301928656342495916796739798145108760106596411606848786275352526716928 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 #s(approx (* (/ 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 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 19999999999999999637017414376799615729435301928656342495916796739798145108760106596411606848786275352526716928 binary64)) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 1 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 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 200 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (*.f64 l (/.f64 #s(literal 2 binary64) Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 200 binary64)) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) #s(approx (sqrt (+ 1 (* (pow (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2))))) (*.f64 (hypot.f64 (sin.f64 kx) (sin.f64 ky)) (*.f64 (/.f64 #s(literal 2 binary64) Om) l)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 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 5000000000000000452984832 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 #s(literal 1/2 binary64) (-.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 kx kx)))))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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(literal 1/2 binary64))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 5000000000000000452984832 binary64)) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (-.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (+.f64 ky ky)) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) #s(literal 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 5000000000000000452984832 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 (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 kx kx)) (cos.f64 (*.f64 ky #s(literal 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(literal 1/2 binary64))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 5000000000000000452984832 binary64)) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 #s(approx (- 1/2 (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx)))))) (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) (cos.f64 (+.f64 kx kx))) #s(literal 1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64)))) #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 5000000000000000452984832 binary64)) (sqrt.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (/.f64 l Om) #s(literal 4 binary64)) l)) (/.f64 #s(literal 1 binary64) 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(literal 1/2 binary64))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 5000000000000000452984832 binary64)) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l)) (/.f64 #s(literal 1 binary64) Om) #s(literal 1 binary64)))) #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 5000000000000000452984832 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 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (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(literal 1/2 binary64))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 5000000000000000452984832 binary64)) (sqrt.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) (*.f64 (-.f64 #s(literal 1/2 binary64) #s(approx (- (* 1/2 (cos (+ ky ky))) (- 1/2 (* 1/2 (cos (+ kx kx))))) (*.f64 (cos.f64 (*.f64 ky #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (/.f64 l Om)) #s(literal 1 binary64)))) #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 200 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 200 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 l Om)) l) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 kx kx)) #s(literal 1/2 binary64)) Om) #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 (/ (* 2 l) Om) 2) (+ (pow (sin kx) 2) (pow (sin ky) 2)))))))) #s(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #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 5 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(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #s(literal 1/2 binary64))))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 5 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(approx (+ (* (sqrt (/ 1 (+ (* (* 4 (* l l)) (/ (pow (sin ky) 2) (* Om Om))) 1))) 1/2) 1/2) (fma.f64 (/.f64 Om (*.f64 (sin.f64 ky) l)) #s(literal -1/4 binary64) #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 5 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))))
(if (<=.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 ky) #s(literal 2 binary64)) (pow.f64 (sin.f64 kx) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 l #s(literal 2 binary64)) Om) #s(literal 2 binary64))) #s(literal 5 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)))

soundness1.2s (8.5%)

Memory
46.2MiB live, 1 180.1MiB allocated
Rules
11 696×lower-fma.f64
11 696×lower-fma.f32
9 698×lower-fma.f64
9 698×lower-fma.f32
9 134×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058210419
1193210186
2793410184
080449659
098803
0161779
1596603
25077603
08200590
0158344333
1534443276
0882641441
01031119
01611094
1725858
25926845
08058819
077632
0138626
1512521
24319504
08189490
021116
037116
1129113
2924113
08513109
0154244780
1517143719
0858841672
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
Compiler

Compiled 909 to 367 computations (59.6% saved)

preprocess95.0ms (0.7%)

Memory
-1.1MiB live, 229.9MiB allocated
Remove

(sort kx ky)

(abs kx)

(abs ky)

Compiler

Compiled 1 622 to 646 computations (60.2% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...